Sign in
eclipse
/
gerrit
/
ptp
/
org.eclipse.photran
/
e5f6fab10b208de0002e882eee13cb3914e0f532
/
.
/
org.eclipse.photran.core.vpg.tests
/
control-flow-test-code
/
test-cycle
/
test-cycle.f90
blob: c879e1eeffa554813311013cf415e2744cafc1f2 [
file
] [
log
] [
blame
]
program testcycle
integer
::
i
do
i
=
1
,
5
print
*,
"1"
cycle
print
*,
"2"
end
do
print
*,
"3"
end
program testcycle
!<<<<<
12