t_id
1081
t_adddate
2003/10/14
t_result
0
Flag
t_fail
set
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
1022779827 | 1027388 | True | False | Success, compilation failed |
Record count: 1
{ %FAIL } var dat : file of byte; j : longint; Buffer : Array[0..2047] of byte; begin for j:=0 to 2047 do Buffer[j]:=j and $ff; Assign(dat,'tbug896.tmp'); Rewrite(dat,1); for j:= 0 to 2047 do { writeln should not be allowed for typed files } writeln (dat,Buffer[j]); Close(dat); end.