• 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

This thread ...


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