Sign in
gnu
/
gcc
/
refs/tags/basepoints/gcc-13
/
.
/
gcc
/
testsuite
/
gnat.dg
/
discr25_pkg.ads
blob: c09634d8c5f7185b8656f92e972ead6ab08d2d98 [
file
] [
log
] [
blame
]
generic
N
:
Natural
;
package
Discr25_Pkg
is
type T
is
private
;
procedure
Proc1
(
Set
:
in
out
T
);
private
type
Obj_T
(
Size_Max
:
Natural
);
type T
is
access
Obj_T
;
end
Discr25_Pkg
;