Sign in
gnu
/
gcc
/
93ac832f1846e4867aa6537f76f510fab8e3e87d
/
.
/
gcc
/
testsuite
/
gnat.dg
/
suppress_initialization.adb
blob: 68293d598a3d4de140caae98d2d993c0eb21a2a4 [
file
] [
log
] [
blame
]
--
{
dg
-
do
compile
}
with
Suppress_Initialization_Pkg
;
procedure
Suppress_Initialization
is
begin
Suppress_Initialization_Pkg
.
Read
;
end
Suppress_Initialization
;