Sign in
eclipse
/
ptp
/
org.eclipse.photran
/
a21b85c92aeb0491365dd3fefba9574145955477
/
.
/
org.eclipse.photran.core.vpg.tests
/
refactoring-test-code
/
extract-local-variable
/
test4-fail-conflict
/
extract_local_4.f90
blob: d84c4aef07cbebfd24c7222147250d311a1ffdea [
file
] [
log
] [
blame
]
program extract_local
implicit
none
integer
::
var
!
Attempting
to extract to
var
should fail since that variable already exists
print
*,
"This is a test"
print
*,
3
+
4
*
5
+
6
!<<<<<
5
,
16
,
5
,
19
,
integer
::
var
,
fail
-
final
end
program