Sign in
eclipse
/
gerrit
/
ptp
/
org.eclipse.photran
/
e5f6fab10b208de0002e882eee13cb3914e0f532
/
.
/
org.eclipse.photran.core.vpg.tests
/
refactoring-test-code
/
add-subroutine-parameter
/
test12-includevalidattributes
/
add_subroutine_parameter_12.f90
blob: de084a3d9e7ffe9ffa0d8d5822b23d72a89816b5 [
file
] [
log
] [
blame
]
program validattributes
!
Tests
that valid attributes
(
intent
(
inout
))
are allowed
.
end
program validattributes
subroutine
sub
(
z
)
!<<<<<
4
,
1
,
4
,
5
,
integer
;
intent
(
inout
)
::
y
,
0
,
0
,
pass
integer
,
intent
(
in
)
::
z
end
subroutine