opt17.ads « gnat.dg « testsuite « gcc « gcc-4.9 - toolchain_gcc - toolchain/gcc

about summary refs log tree commit diff stats

path: root/gcc-4.9/gcc/testsuite/gnat.dg/opt17.ads

blob: 601c2f201c8d462d35056e2f3067fc6e332d8e5b (plain)

package Opt17 is

  subtype S is String (1 .. 5);

  function Func return S;

end Opt17;