summaryrefslogtreecommitdiff
path: root/fpcsrc/tests/webtbs/tw2602.pp
blob: 17e1c8af0a072ed0e869e3428241dd80305d05df (plain)
1
2
3
4
5
6
7
8
9
10
11
12
{ %version=1.1 }

{ Source provided for Free Pascal Bug Report 2602 }
{ Submitted by "Pavel V. Ozerski" on  2003-07-25 }
{ e-mail: ozerski@list.ru }
{$ifdef FPC}
{$mode Delphi}
{$endif}
begin
 with TObject.Create do
  Destroy;
end.