gcc/testsuite/gnat.dg/opt38_pkg.ads

package Opt38_Pkg is

  procedure Test (I : Integer);

end Opt38_Pkg;