t_id
426
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:10:00 32 | 2024/05/21 01:46:00 0 | |
i386 | 38 | 76.0 | 2024/05/21 01:10:00 32 | 2024/05/21 01:46:00 0 | |
x86_64 | 11 | 22.0 | 2024/05/21 01:21:00 14 | 2024/05/21 01:43:00 15 | |
aarch64 | 1 | 2.0 | 2024/05/21 01:29:00 35 | 2024/05/21 01:29:00 35 | |
linux | 50 | 100.0 | 2024/05/21 01:10:00 32 | 2024/05/21 01:46:00 0 | |
3.3.1 | 24 | 48.0 | 2024/05/21 01:18:00 30 | 2024/05/21 01:44:00 50 | |
3.2.3 | 26 | 52.0 | 2024/05/21 01:10:00 32 | 2024/05/21 01:46:00 0 |
{ Old file: tbs0225.pp } { Sigsegv when run with range checks on open arrays OK 0.99.11 (PFV) } program bug0255; {$mode objfpc} {$R+} function erwwert(const feld: array of LongInt):extended; var i: LongInt; begin Result:=0; for i:=low(feld) to high(feld) do begin writeln(i); // gives "0" Result:=Result+feld[i]; end; //^^^^^^^ there occurs the segfault (216) // on the first loop Result:=Result/(high(feld)-low(feld)+1); end; var werte: array[0..299] of LongInt; i: LongInt; begin //init the array for i:=0 to 299 do werte[i]:=Random(5)-2; //and do something with it writeln(erwwert(werte):6:5); end.