t_id
1238
t_adddate
2004/01/23
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
487788642 | 942099 | True | False | Successfully run |
Record count: 1
{ Source provided for Free Pascal Bug Report 2904 } { Submitted by "Alexey Barkovoy" on 2004-01-17 } { e-mail: clootie@ixbt.com } program Project2; {$mode objfpc} {$APPTYPE CONSOLE} uses SysUtils; var i: Integer; label LFail; begin try LFail: // Cleanup // i:= i; //todo: Uncomment this line for FPC_1.9.2 BUG workaround !!! except on EOutOfMemory do i:= 1; else i:= 2; end; end.