summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/loop_optimization7.ads
blob: ab0a165ea904b1b50b658891c229e784d8fb67a0 (plain)
1
2
3
4
5
6
7
8
9
with Loop_Optimization7_Pkg; use Loop_Optimization7_Pkg;

package Loop_Optimization7  is

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

   function Conv (A : Arr) return Arr;

end Loop_Optimization7;