(root)/
gcc-13.2.0/
gcc/
testsuite/
gnat.dg/
specs/
concat1_pkg.ads
-- { dg-excess-errors "cannot generate code" }

package Concat1_Pkg is

   function Id_For (Name : String) return Natural;

   function Image_Of return String;

end Concat1_Pkg;