RosettaCodeData/Task/Call-a-function/360-Assembly/call-a-function-2.360
2017-09-25 22:28:19 +02:00

7 lines
247 B
Text

L R15,=V(MULTPLIC)
LA R1,PARMLIST address of the paramter list
BALR R14,R15 branch and link
ST R0,Z Z=MULTPLIC(X,Y)
* ...
PARMLIST DC A(X)
DC A(Y)