t_id
942
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/05/21 01:22:00 34 | 2024/05/21 03:08:00 0 | |
i386 | 12 | 24.0 | 2024/05/21 01:22:00 34 | 2024/05/21 03:02:00 0 | |
x86_64 | 33 | 66.0 | 2024/05/21 01:33:00 15 | 2024/05/21 03:08:00 0 | |
aarch64 | 5 | 10.0 | 2024/05/21 01:42:00 32 | 2024/05/21 02:52:00 39 | |
linux | 48 | 96.0 | 2024/05/21 01:22:00 34 | 2024/05/21 03:04:00 0 | |
win32 | 1 | 2.0 | 2024/05/21 03:02:00 0 | 2024/05/21 03:02:00 0 | |
solaris | 1 | 2.0 | 2024/05/21 03:08:00 0 | 2024/05/21 03:08:00 0 | |
3.3.1 | 27 | 54.0 | 2024/05/21 01:33:00 15 | 2024/05/21 03:08:00 0 | |
3.2.3 | 23 | 46.0 | 2024/05/21 01:22:00 34 | 2024/05/21 03:04:00 0 |
{ Source provided for Free Pascal Bug Report 2318 } { Submitted by "Sergey Kosarevsky" on 2003-01-09 } { e-mail: netsurfer@au.ru } {$static on} Type tObject=Object Constructor Init; Function GetVMT:Pointer;Static; Destructor Done;Virtual; End; Constructor tObject.Init; Begin End; Function tObject.GetVMT:Pointer; Begin GetVMT:=self; End; Destructor tObject.Done; Begin End; Var O:tObject; Begin O.Init; if (O.GetVMT= nil) or (O.getVMT<>tObject.GetVMT) then begin Writeln('Problem with static methods'); Writeln('O.getVMT=',hexstr(longint(O.getVMT),8)); Writeln('tObject.GetVMT=',hexstr(longint(tobject.GetVMT),8)); halt(1); end; End.