XlAscii.mesa
Copyright Ó 1991 by Xerox Corporation. All rights reserved.
Christian Jacobi, March 29, 1991 12:49:11 pm PST
Christian Jacobi, March 29, 1991 1:35 pm PST
DIRECTORY Xl;
XlAscii: CEDAR DEFINITIONS
~ BEGIN
Convert: PROC [connection: Xl.Connection, keyCode: Xl.KeyCode, state: Xl.SetOfKeyButMask ¬ [], matchKeys: LIST OF Xl.KeySym ¬ NIL] RETURNS [char: CHAR, keysym: Xl.KeySym, matched: Xl.KeySym, isModifier: BOOL];
Checks whether specification contains an ASCII key, if so returns it. (0C otherwise).
Returns keysym. ([0] if none found).
If keyCode is not a modifier, check whether key given arbitrary modifiers would match one of the matchKeys; if so returns matching keysym of the matchKeys list. ([0] if none).
Returns whether keyCode is a modifier.
AsciiFromKeySym: PROC [keysym: Xl.KeySym] RETURNS [char: CHAR];
Returns 0C if no reasonable Ascii char is found
KeySymFromAscii: PROC [char: CHAR] RETURNS [keysym: Xl.KeySym];
Returns [0] if char has value without KeySym
END.