t_id
650
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
1022421146 | 1027329 | True | False | Successfully run |
Record count: 1
function dummy : longint; begin dummy:=1; end; var x:function:longint; x2:function:longint; y:pointer absolute x; y2:pointer absolute x2; begin x2:=@dummy; if (y<>nil) or (y2<>pointer(@dummy)) then begin Writeln('Wrong code generated for absolute to procvarsmy'); halt(1); end; end.