Sign in
gnu
/
gcc
/
refs/tags/basepoints/gcc-13
/
.
/
gcc
/
testsuite
/
gnat.dg
/
pointer_variable_bounds_q.ads
blob: 03997f77e630cc10d23210fb4f3caa34a3452b55 [
file
] [
log
] [
blame
]
package
pointer_variable_bounds_q
is
type A_SIZE_TYPE
is
new
INTEGER range
0
..
65536
;
function
A_MAX_COMPS
return
A_SIZE_TYPE
;
end
pointer_variable_bounds_q
;