1! { dg-do compile } 2module foo 3end module foo 4 5 use foo 6 use :: foo 7 use, intrinsic iso_fortran_env ! { dg-error "\"::\" was expected after module nature" } 8 use, non_intrinsic iso_fortran_env ! { dg-error "\"::\" was expected after module nature" } 9 use, nonintrinsic :: iso_fortran_env ! { dg-error "shall be either INTRINSIC or NON_INTRINSIC" } 10 use, intrinsic :: iso_fortran_env 11end 12