Sign in
fuchsia
/
third_party
/
github.com
/
llvm
/
llvm-project
/
60a25202a7dd1e00067fcfce512086ebf3788537
/
.
/
flang
/
test
/
Semantics
/
label10.f90
blob: ad234ccb4bbb16a778d748593658f2e2911680ac [
file
] [
log
] [
blame
]
!
RUN
:
not
%
f18
-
funparse
-
with
-
symbols
%
s
2
>&
1
|
FileCheck
%
s
!
CHECK
:
'60'
not
a FORMAT
!
CHECK
:
data transfer
use
of
'60'
subroutine s
(
a
)
real a
(
10
)
write
(*,
60
)
"Hi there"
60
continue
70
format
(
i8
)
end
subroutine s