summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/lto/pr47839_1.f90
blob: 5c94ff17b5c9654a423e99a6c2c4a7b8fee398d6 (plain)
1
2
3
4
5
6
7
MODULE PEC_mod
CONTAINS
SUBROUTINE PECapply(Ex)
USE globalvar_mod, ONLY : xstop
real(kind=8), dimension(1:xstop), intent(inout) :: Ex
END SUBROUTINE PECapply
END MODULE PEC_mod