summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/loop_optimization6.ads
blob: 9b8a2670322b460e254de250b427550c4df3ba9c (plain)
1
2
3
4
package Loop_Optimization6 is
  A : Integer := 0;
  procedure Main;
end Loop_Optimization6;