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