1package pointer_variable_bounds_q is 2 3 type A_SIZE_TYPE is new INTEGER range 0 .. 65536; 4 function A_MAX_COMPS return A_SIZE_TYPE; 5 6end pointer_variable_bounds_q; 7
1package pointer_variable_bounds_q is 2 3 type A_SIZE_TYPE is new INTEGER range 0 .. 65536; 4 function A_MAX_COMPS return A_SIZE_TYPE; 5 6end pointer_variable_bounds_q; 7