Sign in
eclipse
/
gerrit
/
ptp
/
org.eclipse.photran
/
e5f6fab10b208de0002e882eee13cb3914e0f532
/
.
/
org.eclipse.photran.core.vpg.tests
/
refactoring-test-code
/
remove-assign-gotos
/
test04
/
two_labels_no_goto.f90
blob: 5e440699fc50148e0e704e3b2f0c235b2840d252 [
file
] [
log
] [
blame
]
!
Test
4
:
2
ASSIGN
Labels
,
No
GOTO statement
!
Test
passes
and
replaces two assign statements
with
assignments
program two_labels_no_goto
!<<<<<
1
,
1
,
7
,
12
,
true
,
pass
assign
100
to label1
assign
325
to label2
100
continue
325
stop
end
program