Re: HLL support for interfaces that use R0

2022-03-22 Thread Seymour J Metz
du/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of W Mainframe [01304632a58d-dmarc-requ...@listserv.ua.edu] Sent: Monday, March 21, 2022 10:27 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: HLL support for interfaces that use R0 Seymor, Actually I nev

Re: HLL support for interfaces that use R0

2022-03-22 Thread Seymour J Metz
] on behalf of David Crayford [dcrayf...@gmail.com] Sent: Tuesday, March 22, 2022 2:44 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: HLL support for interfaces that use R0 If the intention is to get the address of the REXX environment block which is passed in R0 then that problem is solved by calling

Re: HLL support for interfaces that use R0

2022-03-22 Thread David Crayford
If the intention is to get the address of the REXX environment block which is passed in R0 then that problem is solved by calling IRXINIT with the FINDENVB function. https://www.ibm.com/docs/en/zos/2.3.0?topic=irxinit-parameters On Mon, 2022-03-21 at 14:44 +, Seymour J Metz wrote: > A

Re: HLL support for interfaces that use R0

2022-03-21 Thread W Mainframe
...@listserv.ua.edu] Sent: Monday, March 21, 2022 5:00 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: HLL support for interfaces that use R0 I have some Rexx functions written in Cobol. Basically we receive the register R0 as a first parameter in Linkage Section. So... Works like a function written

Re: HLL support for interfaces that use R0

2022-03-21 Thread Seymour J Metz
...@listserv.ua.edu] Sent: Monday, March 21, 2022 5:00 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: HLL support for interfaces that use R0 I have some Rexx functions written in Cobol. Basically we receive the register R0 as a first parameter in Linkage Section. So... Works like a function written

Re: HLL support for interfaces that use R0

2022-03-21 Thread W Mainframe
Sorry... My previous email I have made a mistake..  Linkage Section. 01 args.  05 arg1    pointer.  05 arg1l   pic s(9) comp. 01 evalblock.  05 eval1      pic x(4).  05 eval2      pic x(4).  05 eval3       pic s(9) comp.  05 eval4      pic x(4).  05 evals      pic x(80). Procedure Division p1 p2

Re: HLL support for interfaces that use R0

2022-03-21 Thread W Mainframe
I have some Rexx functions written in Cobol. Basically we receive the register R0 as a first parameter in Linkage Section. So... Works like a function written in HLASM. It's fun and very interesting. RegardsDan Sent from Yahoo Mail for iPhone On Monday, March 21, 2022, 11:44 AM, Seymour J

HLL support for interfaces that use R0

2022-03-21 Thread Seymour J Metz
A recent thread on REXX raises the question of what compilers support interfaces that require passing an address in R0 in addition to the PLIST address in R1. A secondary issue is how to handle multiple callbacks from a non-LE program without the overhead of establishing the LE environment each