Sign in
llvm
/
llvm-project
/
858eb8fc11e2e683ef1cef956ac102bfc5f0a1a8
/
.
/
flang
/
test
/
Semantics
/
blockconstruct03.f90
blob: 75ffcadbb93cdd329b439697884a7c34b0c53a8e [
file
] [
log
] [
blame
]
!
RUN
:
%
python
%
S
/
test_errors
.
py
%
s
%
flang_fc1
!
Tests
implemented
for
this
standard
:
!
Block
Construct
!
C1109
subroutine s5_c1109
b1
:
block
!
ERROR
:
BLOCK construct name mismatch
end
block b2
end