Sign in
llvm
/
llvm-project
/
1b47489fd0e1c3ddbeabb421b668b7bc623fd622
/
.
/
flang
/
test
/
Semantics
/
implicit04.f90
blob: 3fb20b22f13d75bb9ed99983e55ebec5d12a94f5 [
file
] [
log
] [
blame
]
!
RUN
:
%
S
/
test_errors
.
sh
%
s
%
t
%
flang_fc1
subroutine s
parameter
(
a
=
1.0
)
!
ERROR
:
IMPLICIT NONE statement after PARAMETER statement
implicit
none
end
subroutine