t_id
823
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
1022312098 | 1027311 | True | False | Successfully run |
Record count: 1
{$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.