Sign in
llvm
/
llvm-project
/
flang
/
refs/heads/main
/
.
/
test
/
Semantics
/
cuf12.cuf
blob: 1b79c9889dfeaf0c642843082f120c81972a0f90 [
file
] [
log
] [
blame
]
!
RUN
:
%
python
%
S
/
test_errors
.
py
%
s
%
flang_fc1
program test
real
,
device
::
b
(
100
)
!
ok
block
real
,
device
::
a
(
100
)
!
ok
end
block
end
program
