Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gnat.dg
/
specs
/
elab4.ads
blob: f402f0104c7777b1d92f87da623fe68ac1ecd183 [
file
] [
log
] [
blame
]
--
{
dg
-
do
compile
}
pragma
Restrictions
(
No_Elaboration_Code
);
with
Elab4_Proc
;
package
Elab4
is
procedure
My_G
is
new
Elab4_Proc
;
end
Elab4
;
--
{
dg
-
final
{
scan
-
assembler
-
not
"elabs"
}
}