mirror of
https://github.com/autc04/Retro68.git
synced 2024-09-28 18:56:06 +00:00
12 lines
393 B
Fortran
12 lines
393 B
Fortran
! { dg-do compile }
|
|
module foo
|
|
end module foo
|
|
|
|
use foo
|
|
use :: foo
|
|
use, intrinsic iso_fortran_env ! { dg-error "\"::\" was expected after module nature" }
|
|
use, non_intrinsic iso_fortran_env ! { dg-error "\"::\" was expected after module nature" }
|
|
use, nonintrinsic :: iso_fortran_env ! { dg-error "shall be either INTRINSIC or NON_INTRINSIC" }
|
|
use, intrinsic :: iso_fortran_env
|
|
end
|