Increase timeout factor for hppa*-*-* in gcc.dg/long_branch.c
[official-gcc.git] / gcc / testsuite / gnat.dg / ghost3.ads
blob8d7ec828d44d0d4e838b691281a86ba28682478a
1 package Ghost3 is
2 type Small_Int is new Natural range 0 .. 5;
3 type Large_Int is new Natural range 0 .. 5000;
5 type Rec_Typ is record
6 Comp_1 : Small_Int;
7 Comp_2 : Large_Int;
8 end record;
10 generic
11 type Any_Typ;
12 package Gen is
13 end Gen;
15 package Freezer with Ghost is
16 package Inst is new Gen (Rec_Typ);
17 end Freezer;
19 procedure Dummy;
20 end Ghost3;