opt17.ads « gnat.dg « testsuite « gcc - cbb-gcc-4.6.4 - compiler building blocks: cbb-gcc-4.6.4: including full support for the midipix targets

summary refs log tree commit diff

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

blob: 601c2f201c8d462d35056e2f3067fc6e332d8e5b (plain)

package Opt17 is

  subtype S is String (1 .. 5);

  function Func return S;

end Opt17;