t_id
413
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:54:00 35 | 2024/05/21 02:30:00 23 | |
i386 | 14 | 28.0 | 2024/05/21 01:55:00 26 | 2024/05/21 02:26:00 23 | |
x86_64 | 34 | 68.0 | 2024/05/21 01:54:00 35 | 2024/05/21 02:30:00 23 | |
aarch64 | 2 | 4.0 | 2024/05/21 02:03:00 35 | 2024/05/21 02:19:00 42 | |
linux | 49 | 98.0 | 2024/05/21 01:54:00 35 | 2024/05/21 02:30:00 23 | |
win32 | 1 | 2.0 | 2024/05/21 02:04:00 34 | 2024/05/21 02:04:00 34 | |
3.3.1 | 27 | 54.0 | 2024/05/21 01:56:00 16 | 2024/05/21 02:30:00 23 | |
3.2.3 | 23 | 46.0 | 2024/05/21 01:54:00 35 | 2024/05/21 02:28:00 35 |
{ Old file: tbs0211.pp } { a and not a is true !!! (if a:=boolean(5)) OK 0.99.11 (PM) } var a,b : boolean; c : byte; i : longint; procedure Error; begin Writeln('Error in bug0211'); Halt(1); end; begin c:=5; a:=boolean(c); if a and not a then Begin Writeln('FPC is crazy !!'); Error; End; i:=256; a:=boolean(i); { the value here is less trivial } { BP returns false here !! } { the problem is the converting wordbool to boolean } { if wordbool is 256 should not convert true to false !! } Writeln('boolean(256) =',a); end.