summaryrefslogtreecommitdiff
path: root/fpcsrc/tests/webtbs/tw2186.pp
blob: 9ed86fa842cde6efba4c14d56ce0cf54b555275c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
{ Source provided for Free Pascal Bug Report 2186 }
{ Submitted by "Andrew Johnson" on  2002-10-16 }
{ e-mail: AJ_Genoius@Hotmail.com }
Program TypeBug;

{$Mode ObjFPC}
Uses Classes;

Type
  NewInt = type longint;

  TSomeClass = Class(TComponent)
  end;

begin

end.