fpc/tests/webtbs/tw0801.pp
2002-09-07 15:40:30 +00:00

13 lines
126 B
ObjectPascal

program WrongHint;
type
PRecord = ^TRecord;
TRecord = record
end;
var
x: PRecord;
begin
New(x);
Dispose(x);
end.