t_id
432
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 02:38:00 0 | |
i386 | 14 | 28.0 | 2024/05/21 01:22:00 34 | 2024/05/21 02:38:00 0 | |
x86_64 | 32 | 64.0 | 2024/05/21 01:33:00 15 | 2024/05/21 02:36:00 0 | |
aarch64 | 4 | 8.0 | 2024/05/21 01:42:00 32 | 2024/05/21 02:36:00 0 | |
linux | 50 | 100.0 | 2024/05/21 01:22:00 34 | 2024/05/21 02:38:00 0 | |
3.3.1 | 27 | 54.0 | 2024/05/21 01:33:00 15 | 2024/05/21 02:36:00 0 | |
3.2.3 | 23 | 46.0 | 2024/05/21 01:22:00 34 | 2024/05/21 02:38:00 0 |
{ Old file: tbs0233.pp } { Problem with enum sets in args OK 0.99.11 (PFV) } program except_test; type byteset = set of byte; enumset = set of (zero,one,two,three); function test(s : byteset) : boolean; begin test:=false; if 0 in s then begin Writeln('Contains zero !'); test:=true; end; end; function testenum(s : enumset) : boolean; begin testenum:=false; if zero in s then begin Writeln('Contains zero !'); testenum:=true; end; end; begin if test([1..5,8]) then halt(1); if not test([0,8,15]) then halt(1); if not testenum([zero,two]) then halt(1); end.