I stumbled across a small routine whose function is to issue a STIMER and 
return to the caler, when the Time Limit Expires. What I found interesting was 
the way this routine saved the return code.
. 
.
STIMER WAIT,DINTVL=WAITTIME    .Wait till the end    
L    R13,SAVE+4                .Return to caller     
ST   R15,16(,R13)      <===HERE
LM   R14,12,12(R13)                                  
BR   R14                    
.
.
Before restoring the callers registers, Register 15
is stored in the Register 15 Slot of the Callers Save Area.
OR that is how it appears to me.
.
Has Anyone seen this technique ?
Any comments on using this technique ?
.
.
Just curious

Paul                
****

Reply via email to