freepascal.compiler/tests/tbs/tb0198.pp

{ Old file: tbs0234.pp }
{ New with void pointer                                OK 0.99.11 (PM) }

program bug0232;

{$mode tp}

var p:pointer;

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