Sign in
llvm
/
llvm-project
/
flang
/
26a1e56ba1a2840b640b934a64ba1ac754eabf7c
/
.
/
test
/
Semantics
/
blockconstruct03.f90
blob: a920d9164ed301773ac3a5133d509f0831105754 [
file
] [
log
] [
blame
]
!
RUN
:
%
S
/
test_errors
.
sh
%
s
%
t
%
f18
!
Tests
implemented
for
this
standard
:
!
Block
Construct
!
C1109
subroutine s5_c1109
b1
:
block
!
ERROR
:
BLOCK construct name mismatch
end
block b2
end