Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gnat.dg
/
discr8_pkg1.ads
blob: ae93dc4d402b0edecfa70a88afbf530169fd35f8 [
file
] [
log
] [
blame
]
with
Ada
.
Strings
.
Unbounded
;
use
Ada
.
Strings
.
Unbounded
;
with
Discr8_Pkg2
;
use
Discr8_Pkg2
;
package
Discr8_Pkg1
is
type T
is
record
A
:
Unbounded_String
;
B
:
L
;
end
record
;
end
Discr8_Pkg1
;