Sign in
llvm
/
llvm-project
/
flang
/
refs/heads/master
/
.
/
test
/
Semantics
/
resolve106.f90
blob: dfc63243d508b614e170d8d766d0bb603fc78e6f [
file
] [
log
] [
blame
]
!
RUN
:
%
flang
-
fsyntax
-
only
-
pedantic
%
s
2
>&
1
|
FileCheck
%
s
integer
,
parameter
::
j
=
10
!
CHECK
:
Implied
DO index
'j'
uses an
object
of the same name
in
its bounds expressions
real
::
a
(
10
)
=
[(
j
,
j
=
1
,
j
)]
end