gcc/testsuite/gnat.dg/opt7_pkg.ads

package Opt7_Pkg is

  procedure My_Raise_Exception;

end Opt7_Pkg;