gcc/testsuite/gnat.dg/opt79.ads

package Opt79 is

  type Arr is array (1 .. 8) of Integer;

  function F (I : Integer) return Arr;

end Opt79;