Sign in
gnu
/
gcc
/
d769c5040874bf9546f2524f3f1d2a894165f92a
/
.
/
gcc
/
testsuite
/
gnat.dg
/
loop_optimization16_pkg.ads
blob: abeecfb646f1b1634a539709980e8325c2b1f3a1 [
file
] [
log
] [
blame
]
package
Loop_Optimization16_Pkg
is
type
Index_Base
is
range
0
..
127
;
function
F
return
Natural
;
end
Loop_Optimization16_Pkg
;