Sign in
gnu
/
gcc
/
d769c5040874bf9546f2524f3f1d2a894165f92a
/
.
/
gcc
/
testsuite
/
gnat.dg
/
generic_inst6_x.ads
blob: 657dc414a82d0ea731ce07431cdb6e77a519082f [
file
] [
log
] [
blame
]
with
Generic_Inst6_G1
;
generic
with
package
G2
is
new
Generic_Inst6_G1
(<>);
with
package
G3
is
new
Generic_Inst6_G1
(<>);
package
Generic_Inst6_X
is
Result
:
Integer
:=
G2
.
Val
*
G3
.
Val
;
end
;