1! RUN: %python %S/test_errors.py %s %flang_fc1 -pedantic 2! Test intrinsic vs non_intrinsic module coexistence 3module iso_fortran_env 4 integer, parameter :: user_defined_123 = 123 5end module 6module m1 7 use, intrinsic :: iso_fortran_env, only: int32 8 !PORTABILITY: Should not USE the non-intrinsic module 'iso_fortran_env' in the same scope as a USE of the intrinsic module 9 use, non_intrinsic :: iso_fortran_env, only: user_defined_123 10end module 11module m2 12 use, intrinsic :: iso_fortran_env, only: int32 13end module 14module m3 15 use, non_intrinsic :: iso_fortran_env, only: user_defined_123 16end module 17module m4 18 use :: iso_fortran_env, only: user_defined_123 19end module 20module m5 21 !ERROR: Cannot parse module file for module 'ieee_arithmetic': Source file 'ieee_arithmetic.mod' was not found 22 use, non_intrinsic :: ieee_arithmetic, only: ieee_selected_real_kind 23end module 24module notAnIntrinsicModule 25end module 26module m6 27 !ERROR: Cannot parse module file for module 'notanintrinsicmodule': Source file 'notanintrinsicmodule.mod' was not found 28 use, intrinsic :: notAnIntrinsicModule 29end module 30 31