Sign in
eclipse
/
ptp
/
org.eclipse.photran
/
a21b85c92aeb0491365dd3fefba9574145955477
/
.
/
org.eclipse.photran.core.vpg.tests
/
refactoring-test-code
/
remove-assign-gotos
/
test01
/
one_label_no_goto.f90
blob: 1a0e1b9cc54de59662f4f4fb69bcd95427015931 [
file
] [
log
] [
blame
]
!
Test
1
:
1
ASSIGN
Label
,
No
GOTO statement
!
This
test passes
and
replaces the assign statement
with
an assignment
program one_label_no_goto
!<<<<<
1
,
1
,
6
,
12
,
true
,
pass
assign
100
to label
100
stop
end
program