Sign in
eclipse
/
gerrit
/
ptp
/
org.eclipse.photran
/
e5f6fab10b208de0002e882eee13cb3914e0f532
/
.
/
org.eclipse.photran.core.vpg.tests
/
refactoring-test-code
/
data-to-parameter
/
test-pointer
/
test-pointer.f90.result
blob: 6e154f48ef1c13cce6702575086a572556676a5b [
file
] [
log
] [
blame
]
program testpointer
!<<<<<
1
,
1
,
fail
-
final
integer
,
pointer
::
p
integer
::
q
,
x
,
y
,
z
parameter
(
x
=
1
)
data p
,
y
/
null
(),
1
/
parameter
(
q
=
3
)
parameter
(
z
=
2
)
end
program testpointer