fpc/tests/webtbs/tw3661.pp
2008-12-29 11:18:26 +00:00

17 lines
318 B
ObjectPascal

{ %cpu=i386,powerpc}
{ %target=linux,win32,go32v2,os2,beos,haiku,morphos }
{ %OPT=-glhc }
{ Source provided for Free Pascal Bug Report 3661 }
{ Submitted by "Martin Schreiber" on 2005-02-16 }
{ e-mail: }
program project1;
{$mode objfpc}{$H+}
uses
Classes;
begin
HaltOnNotReleased := true;
writeln('abc');
end.