t_id
738
t_cpu
i386
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
t_opts
-Or
Record count: 50
Total = 50
OK=50 Percentage= 100.00
| Result type | Cat. | Count | Percentage | First date | Last Date |
| Successfully run | 50 | 100.0 | 2024/05/17 20:46:00 105 | 2024/05/18 00:10:00 29 | |
| i386 | 24 | 48.0 | 2024/05/17 22:07:00 21 | 2024/05/18 00:07:00 24 | |
| sparc | 20 | 40.0 | 2024/05/17 23:24:00 38 | 2024/05/17 23:55:00 41 | |
| powerpc | 1 | 2.0 | 2024/05/17 21:13:00 42 | 2024/05/17 21:13:00 42 | |
| x86_64 | 3 | 6.0 | 2024/05/18 00:05:00 29 | 2024/05/18 00:10:00 29 | |
| powerpc64 | 2 | 4.0 | 2024/05/17 20:46:00 105 | 2024/05/17 20:49:00 112 | |
| linux | 9 | 18.0 | 2024/05/17 20:46:00 105 | 2024/05/18 00:07:00 24 | |
| win32 | 6 | 12.0 | 2024/05/17 22:07:00 21 | 2024/05/17 23:54:00 25 | |
| solaris | 35 | 70.0 | 2024/05/17 23:23:00 25 | 2024/05/18 00:10:00 29 | |
| 3.3.1 | 33 | 66.0 | 2024/05/17 20:46:00 105 | 2024/05/17 23:59:00 30 | |
| 3.2.3 | 17 | 34.0 | 2024/05/17 23:24:00 38 | 2024/05/18 00:10:00 29 |
{ %OPT=-Or }
{ %CPU=i386 }
{ -Or option is not recognized by m68k compiler }
{$mode objfpc}
Type
t = class(TObject)
f1,f2:dword;
constructor Init(p1, p2:dword);
end;
constructor t.Init(p1, p2:dword);
begin
f1:=p1; f2:=p2;
end;
var ti:t;
begin
ti:=t.Init(1,2);
writeln(ti.f1, ', ', ti.f2); // prints garbage instead of t2
if ti.f2<>2 then
Halt(1);
end.