gcc/testsuite/gnat.dg/discr8_pkg3.ads

package Discr8_Pkg3 is
  function Value return Natural;
end Discr8_Pkg3;