t_id
1382
t_adddate
2004/10/26
t_result
0
t_knownrunerror
0
t_opts
-ghcl
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
1022244622 | 1027299 | False | True | Skipping test because for other cpu |
Record count: 1
{ %opt=-ghcl } { Source provided for Free Pascal Bug Report 3348 } { Submitted by "Martin Schreiber" on 2004-10-10 } { e-mail: } program project1; {$mode objfpc}{$H+} // compile with -gh -gc -gl uses Classes; type integerarty = array of integer; procedure proc(ar: array of integer); begin end; var ar1: integerarty; begin ar1:= nil; proc(ar1); // checkpointer error (nil!) end.