Sign in
gnu
/
gcc
/
d769c5040874bf9546f2524f3f1d2a894165f92a
/
.
/
gcc
/
testsuite
/
gnat.dg
/
prot3.adb
blob: 2539065923835be02709e7d9df5e869e8334846a [
file
] [
log
] [
blame
]
--
{
dg
-
do
run
}
with
Prot3_Pkg
;
use
Prot3_Pkg
;
procedure
Prot3
is
begin
P
.
Foo
(
4
);
end
;