This is what we use, and we did use RA before, but are trying to get away from that convention, due to 64-bit registers, such as GRA, GRE, GRF which looks too much like a field names now:
*---------------------------------------------------------------------* * DEFINE GENERAL PURPOSE 32-BIT REGISTER SYMBOLS *---------------------------------------------------------------------* R0 EQU 0,,,,GR32 EQUATE FOR REGISTER 0 R1 EQU 1,,,,GR32 EQUATE FOR REGISTER 1 R2 EQU 2,,,,GR32 EQUATE FOR REGISTER 2 R3 EQU 3,,,,GR32 EQUATE FOR REGISTER 3 R4 EQU 4,,,,GR32 EQUATE FOR REGISTER 4 R5 EQU 5,,,,GR32 EQUATE FOR REGISTER 5 R6 EQU 6,,,,GR32 EQUATE FOR REGISTER 6 R7 EQU 7,,,,GR32 EQUATE FOR REGISTER 7 R8 EQU 8,,,,GR32 EQUATE FOR REGISTER 8 R9 EQU 9,,,,GR32 EQUATE FOR REGISTER 9 RA EQU 10,,,,GR32 EQUATE FOR REGISTER 10 R10 EQU 10,,,,GR32 EQUATE FOR REGISTER 10 RB EQU 11,,,,GR32 EQUATE FOR REGISTER 11 R11 EQU 11,,,,GR32 EQUATE FOR REGISTER 11 RC EQU 12,,,,GR32 EQUATE FOR REGISTER 12 R12 EQU 12,,,,GR32 EQUATE FOR REGISTER 12 RD EQU 13,,,,GR32 EQUATE FOR REGISTER 13 R13 EQU 13,,,,GR32 EQUATE FOR REGISTER 13 RE EQU 14,,,,GR32 EQUATE FOR REGISTER 14 R14 EQU 14,,,,GR32 EQUATE FOR REGISTER 14 RF EQU 15,,,,GR32 EQUATE FOR REGISTER 15 R15 EQU 15,,,,GR32 EQUATE FOR REGISTER 15 - - - - - - - - - - - - - - - - 1 Line(s) not Displayed *---------------------------------------------------------------------* * DEFINE GENERAL PURPOSE 64-BIT REGISTER PAIR SYMBOLS *---------------------------------------------------------------------* R0_R1 EQU 0,,,,GR EQUATE FOR REGISTER PAIR 0/1 R2_R3 EQU 2,,,,GR EQUATE FOR REGISTER PAIR 2/3 R4_R5 EQU 4,,,,GR EQUATE FOR REGISTER PAIR 4/5 R6_R7 EQU 6,,,,GR EQUATE FOR REGISTER PAIR 6/7 R8_R9 EQU 8,,,,GR EQUATE FOR REGISTER PAIR 8/9 R10_R11 EQU 10,,,,GR EQUATE FOR REGISTER PAIR 10/11 R12_R13 EQU 12,,,,GR EQUATE FOR REGISTER PAIR 12/13 R14_R15 EQU 14,,,,GR EQUATE FOR REGISTER PAIR 14/15 - - - - - - - - - - - - - - - - 21 Line(s) not Displayed *---------------------------------------------------------------------* * DEFINE GENERAL PURPOSE 64-BIT REGISTER SYMBOLS *---------------------------------------------------------------------* GR0 EQU 0,,,,GR64 EQUATE FOR REGISTER 0 GR1 EQU 1,,,,GR64 EQUATE FOR REGISTER 1 GR2 EQU 2,,,,GR64 EQUATE FOR REGISTER 2 GR3 EQU 3,,,,GR64 EQUATE FOR REGISTER 3 GR4 EQU 4,,,,GR64 EQUATE FOR REGISTER 4 GR5 EQU 5,,,,GR64 EQUATE FOR REGISTER 5 GR6 EQU 6,,,,GR64 EQUATE FOR REGISTER 6 GR7 EQU 7,,,,GR64 EQUATE FOR REGISTER 7 GR8 EQU 8,,,,GR64 EQUATE FOR REGISTER 8 GR9 EQU 9,,,,GR64 EQUATE FOR REGISTER 9 GRA EQU 10,,,,GR64 EQUATE FOR REGISTER 10 GR10 EQU 10,,,,GR64 EQUATE FOR REGISTER 10 GRB EQU 11,,,,GR64 EQUATE FOR REGISTER 11 GR11 EQU 11,,,,GR64 EQUATE FOR REGISTER 11 GRC EQU 12,,,,GR64 EQUATE FOR REGISTER 12 GR12 EQU 12,,,,GR64 EQUATE FOR REGISTER 12 GRD EQU 13,,,,GR64 EQUATE FOR REGISTER 13 GR13 EQU 13,,,,GR64 EQUATE FOR REGISTER 13 GRE EQU 14,,,,GR64 EQUATE FOR REGISTER 14 GR14 EQU 14,,,,GR64 EQUATE FOR REGISTER 14 GRF EQU 15,,,,GR64 EQUATE FOR REGISTER 15 GR15 EQU 15,,,,GR64 EQUATE FOR REGISTER 15 - - - - - - - - - - - - - - - - 1 Line(s) not Displayed *---------------------------------------------------------------------* * DEFINE GENERAL PURPOSE 128-BIT REGISTER PAIR SYMBOLS *---------------------------------------------------------------------* GR0_R1 EQU 0,,,,GR EQUATE FOR REGISTER PAIR 0/1 GR2_R3 EQU 2,,,,GR EQUATE FOR REGISTER PAIR 2/3 GR4_R5 EQU 4,,,,GR EQUATE FOR REGISTER PAIR 4/5 GR6_R7 EQU 6,,,,GR EQUATE FOR REGISTER PAIR 6/7 GR8_R9 EQU 8,,,,GR EQUATE FOR REGISTER PAIR 8/9 GR10_R11 EQU 10,,,,GR EQUATE FOR REGISTER PAIR 10/11 GR12_R13 EQU 12,,,,GR EQUATE FOR REGISTER PAIR 12/13 GR14_R15 EQU 14,,,,GR EQUATE FOR REGISTER PAIR 14/15 -----Original Message----- From: IBM Mainframe Assembler List [mailto:[email protected]] On Behalf Of Bernd Oppolzer Sent: Wednesday, July 31, 2013 10:44 AM To: [email protected] Subject: Re: YREGS MACRO doc? BTW, do you all use R10 to R15? When I came to the site where I am actually working 25 years ago, I was very surprised that they use RA to RF for 10 to 15 - I never met that before, but you get accustomed to that very quickly. It's always two characters, after all ... STM RE,RC,12(RD) looks quite normal to me ... Kind regards Bernd Am 31.07.2013 08:03, schrieb Jim Mulder: >> >> A search of bookshelf >> z/OS V1R13 Base Elements Optional Features (September 2012) finds no >> documentation for YREGS, but does find a few sample programs which >> use YREGS. >> >> Googgling the program number 5695-DF1 found in YREGS's copyright >> indicates that YREGS is owned by DFSMS. >> >> >> Jim Mulder z/OS System Test IBM Corp. Poughkeepsie, NY >>
