It didn’t seem to work that way 

Ep= didn’t equal RBEPA 
RBEPA documented in the data areas Manuel 
At location +C from RBBASIC say entry point of irb routine 

in fact the last digit was odd 
The cirb is running amode 31 

I’ll re-read again 

But and set a breakpoint after the the cirb 

And look at the IRB it built 

Thanks 

> On Sep 20, 2023, at 8:06 PM, Michael Stein <m...@zlvfc.com> wrote:
> 
> On Wed, Sep 20, 2023 at 06:00:06PM -0400, Joseph Reichman wrote:
>> I decided to use the CIRB macro so that way I could build my own IRB 
>> 
>>  The problem seems to be the AMODE of my RBOPSW is 24 so the high order
>> byte of my rbepa gets chopped off 
> 
> RPEPA doesn't belong to you, you should not touch it. 
> 
> You specified EP= so thats the entry point the IRB will be set
> up to use.
> 
> AMODE=CALLER specifies the AMODE for the routine to be run by the IRB
> routine.  What AMODE is the caller of CIRB running in?
> 
> Go read the CIRB desscription and pay attention to interactions of the
> various operands.
> 
>> 8 *                                                                       
>> 9          CIRB EP=IRBADD,                                               X
>> 0                SVAREA=YES,                                             X
>> 1                KEY=SUPR,                                               X
>> 2                MODE=SUPR,                                              X
>> 3                RETIQE=YES,                                             X
>> 4                STAB=DYN,                                               X
>> 5                WKAREA=255,                                             X
>>                RETRN=YES,                                              X
>>                AMODE=CALLER                                             
> 
> As noted by a prevous poster XR R15,R14 won't usually clear R15.
> 
>>         XR   R15,R14                                                   
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to