freepascal.compiler/tests/tbs/tb0215.pp

{ Old file: tbs0254.pp }
{ problem of endless loop if string at end of main file without new line.                               OK 0.99.11 (PM) }

begin
end.

disposestr