t_id
664
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
1022673292 | 1027369 | True | False | Successfully run |
Record count: 1
{$mode delphi} var err : boolean; procedure p1(s:string);overload; begin end; procedure p1(l:longint);overload; begin err:=false; end; var pv : procedure(l:longint); begin err:=true; pv:=p1; pv(1); if err then begin writeln('Error!'); halt(1); end; end.