Sign in
eclipse
/
gerrit
/
ptp
/
org.eclipse.photran
/
e5f6fab10b208de0002e882eee13cb3914e0f532
/
.
/
org.eclipse.photran.core.vpg.tests
/
refactoring-test-code
/
extract-procedure
/
test08-charlen.f90
blob: d50fa5da161d42a42349498af4c12177fea5f372 [
file
] [
log
] [
blame
]
program refactor
implicit
none
character
(
3
)
::
charvar
charvar
=
'abc'
print
*,
charvar
!<<<<<
START
!<<<<<
END
end
program refactor