t_id
217
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
| tr_id | run | tr_ok | tr_skip | tr_result |
|---|---|---|---|---|
| 950229854 | 1015714 | True | False | Successfully run |
Record count: 1
program targs;
var
i: integer;
Begin
for i:=0 to (argc-1) do
Begin
WriteLn(argv[i]);
End;
end.
{
$Log: targs.pp,v $
Revision 1.2 2002/10/20 11:44:15 carl
+ setstring testing
* args checking is not interactive
+ zero and negative length checking for move/fillchar
Revision 1.1 2002/10/19 22:22:33 carl
* small test for argv/argc checking
}