PR debug/66535
[official-gcc.git] / gcc / testsuite / gnat.dg / stack_usage1_pkg.ads
blobdbe4dae65cd81d1c22a0f3546bad53ae55eedb92
1 package Stack_Usage1_Pkg is
3 function Ident_Int (X : Integer) return Integer;
5 type R is
6 record
7 C0, C1, C2, C3, C4, C5, C6, C7, C8, C9 : Integer;
8 end record;
10 procedure My_Proc (X : R);
12 end Stack_Usage1_Pkg;