t_id
823
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
1022217278 | 1027294 | False | False | Failed to run |
Record count: 1
found: tw1479.tmp found: ./tw1479.tmp An unhandled exception occurred at $000FD1F0: EControlC: Control-C hit $000FD1F0
{$ifdef fpc}{$mode objfpc}{$endif} uses sysutils; const fname = 'Makefile'; ThisDir = '.'+DirectorySeparator; var fn : string; begin fn:=FileSearch(fname,PathSeparator); writeln('found: ',fn); if fn<>fname then halt(1); fn:=FileSearch(ThisDir+fname,PathSeparator); writeln('found: ',fn); if fn<>ThisDir+fname then halt(1); end.