gcc/testsuite/gnat.dg/limited_with2_pkg1.ads


1
2
3
4
5
6
7
8
9

limited with Limited_With2_Pkg2;

package Limited_With2_Pkg1 is

   type Rec2 is record
      F : access Limited_With2_Pkg2.Rec3;
   end record;

end Limited_With2_Pkg1;