Sign in
llvm
/
llvm-project
/
flang
/
eda5f3e1c500d89c4a053b151d7073412c3d02f2
/
.
/
test
/
Semantics
/
resolve01.f90
blob: a29a0e09025f3014c8736c873cb713e7972ede07 [
file
] [
log
] [
blame
]
!
RUN
:
%
S
/
test_errors
.
sh
%
s
%
t
%
flang_fc1
integer
::
x
!
ERROR
:
The
type of
'x'
has already been declared
real
::
x
integer
(
8
)
::
i
parameter
(
i
=
1
,
j
=
2
,
k
=
3
)
integer
::
j
!
ERROR
:
The
type of
'k'
has already been implicitly declared
real
::
k
end