modfile05.f90
386 Bytes
! RUN: %S/test_modfile.sh %s %t %f18
! Use-association with VOLATILE or ASYNCHRONOUS
module m1
real x
integer y
volatile z
contains
end
module m2
use m1
volatile x
asynchronous y
end
!Expect: m1.mod
!module m1
!real(4)::x
!integer(4)::y
!real(4),volatile::z
!end
!Expect: m2.mod
!module m2
!use m1,only:x
!use m1,only:y
!use m1,only:z
!volatile::x
!asynchronous::y
!end