xref: /dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/gnat.dg/pack20_pkg.ads

package Pack20_Pkg is

   type String_Ptr is access all String;

   procedure Modify (Fixed : in out String_Ptr);

end Pack20_Pkg;