! 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