fpc/tests/tbs/tb0332.pp
2000-11-30 22:38:14 +00:00

5 lines
47 B
ObjectPascal

var
l : farpointer;
begin
l:=ptr(0,0);
end.