(root)/
gcc-13.2.0/
gcc/
testsuite/
gnat.dg/
pointer_variable_bounds_q.ads
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;