I may be the lone voice of dissent on this. I really don't like "magic values" 
and rarely like literals. In the case given


   IC  R0,=AL1(1,0,2,3,4,0)(R7)

In my "weirdness", I might code this like:

  IC R0,&UNDERSTANDABLE_NAME(R7)

Where &UNDERSTANDABLE_NAME would be a SETC or GLBC symbol set at the beginning 
of the code:

   LCLC &UNDERSTANDABLE_NAME
&UNDERSTANDABLE_NAME SETC '=AL1(1,0,2,3,4,0)'

The same with other literals. Use a SETC symbol with a good name and use it 
instead of the "magic value". In order to "gross out" everybody, I do the same 
in C with #define

--
John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone *
[email protected] * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM


> -----Original Message-----
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> [email protected]] On Behalf Of Tony Harminc
> Sent: Thursday, November 15, 2012 10:58 AM
> To: [email protected]
> Subject: Re: the fun of coding in HLASM
>
> On 15 November 2012 10:12, Rob van der Heij <[email protected]> wrote:
>
> > If you care to undo the effect of more readable constants, you could
> do this :-)
> >       CLC   =X'58F0,0014,58FF'(R6),0(R6)
>
> Yuck! :-(  Isn't there an assembler option that will catch this?
> Perhaps if R6 is defined as
> R6       EQU   6,,,,GR
> or the like?
>
> > I recently used the following, and thought was pretty cool
> >    IC  R0,=AL1(1,0,2,3,4,0)(R7)
>
> Sure - that's both cool and readable.
>
> Tony H.

Reply via email to