Sign in
gnu
/
gcc
/
b2d961e7342b5ba4e57adfa81cb189b738d10901
/
.
/
gcc
/
testsuite
/
gnat.dg
/
specs
/
weak1.ads
blob: 82cddc09ac27156233f7fc6e61465c55772a927d [
file
] [
log
] [
blame
]
package
Weak1
is
Myconst
:
constant
Integer
:=
1234
;
pragma
Export
(
C
,
Myconst
,
"myconst"
);
pragma
Weak_External
(
Myconst
);
end
Weak1
;