t_id
1289
t_adddate
2004/05/17
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
{ Source provided for Free Pascal Bug Report 3023 } { Submitted by "Michael" on 2004-03-23 } { e-mail: Michael.VanCanneyt@wisa.be } {$mode objfpc} program testa; Var A : Array of Integer; begin If Not Assigned(A) then halt(0) else halt(1); end.