Sign in
gnu
/
gcc
/
d769c5040874bf9546f2524f3f1d2a894165f92a
/
.
/
gcc
/
testsuite
/
gnat.dg
/
sso9.adb
blob: be35bdcc666d0fc86126336043481d1b78de9e13 [
file
] [
log
] [
blame
]
--
{
dg
-
do
compile
}
--
{
dg
-
options
"-O3 -gnatws"
}
with
SSO9_Pkg
;
use
SSO9_Pkg
;
procedure SSO9
is
A
:
Arr
;
begin
Proc
(
A
);
end
;