t_id
217
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
1022670920 | 1027369 | 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 }