In the unlikely event that IBM ever decides to make it's PL/I compiler
available again for Windoze or Linux, and you need a test to run programs
on those systems in addition to running them on z/OS, the following
declares will automagically give you two flags to test for the endianness
and ASCII(UTF-8)/EBCDIC:

2 * union,
  3 *             fixed bin (31) init (-2147483648),
  3 is_big_endian bit        (1) aligned,

2 * union,
  3 *             char       (4) init ('0000'),
  3 is_ebcdic     bit        (1) aligned,

And the char 4 is just to keep everything nicely double-word aligned.

Rober
-- 
Robert AH Prins
robert(a)prino(d)org
The hitchhiking grandfather <https://prino.neocities.org/index.html>
Some REXX code for use on z/OS
<https://prino.neocities.org/zOS/zOS-Tools.html>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to