1! RUN: %python %S/test_errors.py %s %flang_fc1 2subroutine foo 3end 4subroutine iso_fortran_env 5end 6subroutine bad1 7 !ERROR: 'foo' is not a module 8 use foo 9end 10subroutine ok1 11 use, intrinsic :: iso_fortran_env 12end 13subroutine ok2 14 use iso_fortran_env 15end 16subroutine bad2 17 !ERROR: 'iso_fortran_env' is not a module 18 use, non_intrinsic :: iso_fortran_env 19end 20