gcc/testsuite/gfortran.dg/iso_fortran_env_4.f90


1
2
3
4
5
6
7
8
9
10
11
12
13
14

! { dg-do compile }
module iso_fortran_env
end module iso_fortran_env

program foo
 use, intrinsic :: iso_fortran_env
 use, non_intrinsic :: iso_fortran_env ! { dg-error "conflicts with intrinsic module" }
end program foo

subroutine truc
 use, non_intrinsic :: iso_fortran_env
 use, intrinsic :: iso_fortran_env ! { dg-error "conflicts with non-intrinsic module" }
end subroutine truc
! { dg-final { cleanup-modules "iso_fortran_env" } }