9 lines
114 B
Rexx
9 lines
114 B
Rexx
a.=4711
|
|
Say 'before sub a.3='a.3
|
|
Call sub a.
|
|
Say ' after sub a.3='a.3
|
|
Exit
|
|
sub: Procedure
|
|
use Arg a.
|
|
a.3=3
|
|
Return
|