1-- { dg-do run } 2-- { dg-options "-O2" } 3 4with Loop_Optimization4_Pkg; use Loop_Optimization4_Pkg; 5 6procedure Loop_Optimization4 is 7begin 8 Add ("Nothing"); 9end; 10
1-- { dg-do run } 2-- { dg-options "-O2" } 3 4with Loop_Optimization4_Pkg; use Loop_Optimization4_Pkg; 5 6procedure Loop_Optimization4 is 7begin 8 Add ("Nothing"); 9end; 10