Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gnat.dg
/
loop_optimization4.adb
blob: a6799f393e769d211b641096d4dd12e70d54a08b [
file
] [
log
] [
blame
]
--
{
dg
-
do
run
}
--
{
dg
-
options
"-O2"
}
with
Loop_Optimization4_Pkg
;
use
Loop_Optimization4_Pkg
;
procedure
Loop_Optimization4
is
begin
Add
(
"Nothing"
);
end
;