Re: Characters with codes >= 128

[mooremj@EGLIN-VAX.ARPA ("MARTIN J. MOORE")]

I encountered the same problem in attempting to use DEC's extended character
set.  I worked around it by using an UNCHECKED_CONVERSION to stick 8-bit
values into CHARACTER objects (thereby making the program erroneous according
to the LRM; however, it worked.) 

For example, to use the DEC control character CSI (= 155) I did:

  function EIGHT_BIT_CHARACTER is new UNCHECKED_CONVERSION (INTEGER, CHARACTER);

  CSI : constant CHARACTER := EIGHT_BIT_CHARACTER (155);

Characters so defined could then be used in string constants, such as
the following:

  ERASE_SCREEN : constant STRING := CSI & "2J";	-- ANSI erase screen command

------------------------------------------------------------------------------
Martin Moore
mooremj@eglin-vax.arpa
------