summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/loop_optimization5_pkg.ads
blob: 4af6c1ce693b57813ec4966dd06b793e497c474e (plain)
1
2
3
4
5
6
7
package Loop_Optimization5_Pkg is

  type String_Access is access all String;
  function Init return String;
  function Locate (S : String) return String_Access;

end Loop_Optimization5_Pkg;