PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7932 Location: Salford, UK
|
Posted: Mon Feb 20, 2017 12:59 pm Post subject: |
|
|
In the next release the following code will behave as expected, feeding back the modified value of n as a result of applying %il.
Code: | module m
integer n
contains
integer function f()
print*,n
f = 2
end function f
end module m
program main
use m
integer iw,winio@
n = 42
iw = winio@("%il&",1,10)
iw = winio@("%rd&",n)
iw = winio@("%mn[Print]",f)
end |
|
|