Sign in
eclipse
/
ptp
/
org.eclipse.photran
/
add107fbe20f26b89a427d0a5d3385c479f20408
/
.
/
org.eclipse.photran.core.vpg.tests
/
rename-test-code
/
bug278324.f90
blob: b136aa764a9dcdd05ca95e9d4e68c974b1809ac1 [
file
] [
log
] [
blame
]
PROGRAM
MyProgram
IMPLICIT NONE
CHARACTER
(
len
=
5
)
::
parmValFormat
!
3
,
25
999
FORMAT
(
'(A'
,
I2
,
','
)
WRITE
(
parmValFormat
,
999
)
!
5
,
11
WRITE
(
25
,
parmValFormat
// "' = ', I10, ' [CHANGED]')") ! 6,15
END
PROGRAM
MyProgram