t_id
305
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
524632616 | 948050 | True | False | Successfully run |
Record count: 1
{ Old file: tbs0055.pp } { internal error 10 (means too few registers OK 0.99.1 (FK) } type tarraysingle = array[0..1] of single; procedure test(var a : tarraysingle); var i,j,k : integer; begin a[i]:=a[j]-a[k]; end; begin end.