freepascal.compiler/bugs/bug0234.pp

program bug0232;

var p:pointer;

begin
     new(p);
     dispose(p);
end.