9f33dd733f
Intrinsic module names are not in the user's namespace, so they are free to declare global names that conflict with intrinsic modules. Differential Revision: https://reviews.llvm.org/D126140
20 lines
359 B
Fortran
20 lines
359 B
Fortran
! RUN: %python %S/test_errors.py %s %flang_fc1
|
|
subroutine foo
|
|
end
|
|
subroutine iso_fortran_env
|
|
end
|
|
subroutine bad1
|
|
!ERROR: 'foo' is not a module
|
|
use foo
|
|
end
|
|
subroutine ok1
|
|
use, intrinsic :: iso_fortran_env
|
|
end
|
|
subroutine ok2
|
|
use iso_fortran_env
|
|
end
|
|
subroutine bad2
|
|
!ERROR: 'iso_fortran_env' is not a module
|
|
use, non_intrinsic :: iso_fortran_env
|
|
end
|