gcc/testsuite/gnat.dg/opt94_pkg.ads

   1 package Opt94_Pkg is
   2
   3   function Valid_Result (S : String) return Boolean;
   4   pragma Inline (Valid_Result);
   5
   6   function Result (S : String) return Integer;
   7   pragma Inline (Result);
   8
   9   function Get return String;
  10
  11 end Opt94_Pkg;