• Subject: Hex Literals in CL
  • From: Qile <Qile@xxxxxxx>
  • Date: Thu, 22 Jan 1998 22:46:55 EST
  • Organization: AOL (http://www.aol.com)

Does anyone else know of a way to specify hexadecimal literals in CL for
example I would like to do the following:

IF   (&FIELD = X'F021') THEN(DO)

But I can find no way of doing this directly, I have to specify a field
initialized to the hex value and then compare against the field:

DCL  &XF021  *CHAR  2  VALUE(X'F021')

IF  (&FIELD = &XF021) THEN(DO)

Does anyone know of an easier workaround or if this omission will ever be
enabled in CL?

-Paul Jackson
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com

Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2015 by MIDRANGE dot COM and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact