gcc/testsuite/gnat.dg/concat1_pkg.ads

package Concat1_Pkg is

  function Ident (I : Integer) return Integer;

end Concat1_Pkg;