> -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[email protected]] On > Behalf Of Edward Jaffe > Sent: Tuesday, February 10, 2009 10:40 AM > To: [email protected] > Subject: Re: Assembler Question <Snipped> > I assemble with SYSSTATE ARCHLVL=1 or SYSSTATE ARCHLVL=2. I do not > assemble with SYSSTATE ARCHLVL=0. My programs use base registers only > for constants, literals and working storage--not code. I would know > right away if a macro generated a B or BAL. FYI, on my system WTO > generates this: > > 34384 WTO 'I am here' > 34386+ CNOP 0,4 > 34387+ BRAS 1,IHB4648A BRANCH AROUND MESSAGE > 34388+ DC AL2(13) TEXT LENGTH > 34389+ DC B'0000000000000000' MCSFLAGS > 34390+ DC C'I am here' MESSAGE TEXT > 34391+IHB4648A DS 0H > 34392+ SVC 35 ISSUE SVC 35
What level of z/OS are you at? I am at 1.8 and also assemble with SYSSTATE ARCHLVL=2 and a simple WTO of a string generates BAL, not BRAS. Browsing the text of the WTO macro, it looks to me like the standard form is hard-coded to generate BAL, though I could be missing something. There is no BRAS in the macro text. > For more ancient macros, I often use IEABRCX PUSH/POP to change B and > BAL/BAS to J and JAS just for the "problem" macro. For example: > > IEABRCX ENABLE Enable B-to-J conversion > PUSH ACONTROL Save ACONTROL status > ACONTROL FLAG(NOSUBSTR) Don't flag substring errors > CALLTSSR EP=IKJPARS, Invoke TSO/E parse routine > MF=(E,PPL) (same) > POP ACONTROL Restore ACONTROL status > IEABRCX DISABLE Disable B-to-J conversion Hm-m-m. No macro IEABRCX in my 1.8 SYS1.MACLIB or SYS1.MODGEN, only the IEABRC member. Is IEABRCX available at 1.9 or 1.10 only? Or is there a retro-fitting APAR for 1.8? Peter This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
