t_id
859
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
t_opts
-Sew
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
1022997245 | 1027424 | True | False | Successfully run |
Record count: 1
{ %opt=-Sew } {$mode objfpc}{$H+} function A: boolean; procedure CheckResult; begin if not Result then writeln('Oha'); end; begin Result:=false; CheckResult; end; begin A; end.