Sign in
gnu
/
gcc
/
f00b5710a30f22efc3171c393e56aeb335c3cd39
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
pr71204.f90
blob: 1d1ee5c34a157921689cd469f91744b226eddbf3 [
file
] [
log
] [
blame
]
!
PR fortran
/
71204
!
{
dg
-
do
compile
}
!
{
dg
-
options
"-O0"
}
module
pr71204
character
(
10
),
allocatable
::
z
(:)
end
module
subroutine s1
use
pr71204
z
(
2
)
=
z
(
1
)
end
subroutine s2
use
pr71204
z
(
2
)
=
z
(
1
)
end