t_id
647
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
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/06/02 01:33:00 0 | 2024/06/02 03:03:00 41 | |
i386 | 14 | 28.0 | 2024/06/02 01:33:00 0 | 2024/06/02 03:03:00 41 | |
x86_64 | 34 | 68.0 | 2024/06/02 01:34:00 0 | 2024/06/02 02:32:00 22 | |
aarch64 | 2 | 4.0 | 2024/06/02 02:17:00 38 | 2024/06/02 02:19:00 41 | |
linux | 48 | 96.0 | 2024/06/02 01:33:00 0 | 2024/06/02 02:32:00 22 | |
win32 | 1 | 2.0 | 2024/06/02 02:04:00 35 | 2024/06/02 02:04:00 35 | |
solaris | 1 | 2.0 | 2024/06/02 03:03:00 41 | 2024/06/02 03:03:00 41 | |
3.3.1 | 27 | 54.0 | 2024/06/02 01:33:00 0 | 2024/06/02 03:03:00 41 | |
3.2.3 | 23 | 46.0 | 2024/06/02 02:01:00 27 | 2024/06/02 02:31:00 25 |
{$ifdef fpc} {$mode tp} {$endif fpc} function times2(x : longint) : longint; begin times2:=2*x; end; var x:function(x:longint):longint; y:pointer absolute x; z,w,v:pointer; begin z:=@@x; w:=addr(@x); v:=@(addr(x)); writeln(longint(y),' ',longint(z),' ',longint(w),' ',longint(v)); if (z<>w) or (z<>v) then begin writeln('Addr Error'); halt(1); end; if (y<>nil) then begin writeln('Absolute Error'); halt(1); end; x:=times2; if (y<>@times2) then begin writeln('Absolute Error'); halt(1); end; end.