gcc-4.9/gcc/testsuite/gnat.dg/opt28.ads


1
2
3
4
5
6
7
8

-- { dg-do compile }
-- { dg-options "-O2" }

package Opt28 is

  function Full_Filename (Filename : String) return String;

end Opt28;