1 /* BEGIN INCLUDE FILE ... tty_mode_names.incl.pl1 */
 2 
 3 /* Defines internal static character strings for all legal tty modes */
 4 /* Created 6/17/75 by Robert Coren */
 5 /* modified 4/10/79 by J. Stern to add MPX_MODES */
 6 /* modified 8/13/79 by Robert Coren to add iflow & oflow */
 7 /* modified 1/21/80 by Robert Coren to add no_outp, oddp, & 8bit */
 8 /* modified 03/30/82 by Richard Lamson to add "ll", "pl", and "can_type"
 9    and to reorganize modestr to be defined on MODE_NAME */
10 
11 
12 /****^  HISTORY COMMENTS:
13   1) change(88-07-05,Parisek), approve(88-07-05,MCR7928),
14      audit(88-07-08,Beattie), install(88-07-19,MR12.2-1061):
15      Changed declaration of modestr to use the "simple defining" technique
16      thus fixing compilation errors resulting from the use of the "isub"
17      value within a "isub defining" technique (defining techniques as
18      described in Multics PL/I Reference Manual - AM83).
19                                                    END HISTORY COMMENTS */
20 
21 
22 dcl  n_modes fixed bin int static init (29);                /* number of valid modes */
23 
24 declare   MODE_NAME (-2:29) character (8) internal static options (constant) initial
25     ("ll", "pl", "can_type",                                /* -2 : 0  */
26      "edited", "tabs", "can", "esc",                        /*  1 : 4  */
27      "erkl", "rawi", "rawo", "red",                         /*  5 : 8  */
28      "vertsp", "crecho", "lfecho", "tabecho",               /*  9 : 12 */
29      "hndlquit", "fulldpx", "echoplex", "capo",             /* 13 : 16 */
30      "replay", "polite", "ctl_char", "blk_xfer",            /* 17 : 20 */
31      "breakall", "scroll", "prefixnl", "wake_tbl",          /* 21 : 24 */
32      "iflow", "oflow", "no_outp", "8bit",                   /* 25 : 28 */
33      "oddp");                                               /* 29 : 29 */
34 
35 
36 declare   modestr (1:29) character (8) unaligned defined (MODE_NAME (1));
37 
38 /* MPX_MODES (i) = "1"b => modestr (i) must be implemented by a multiplexer */
39 
40 dcl  MPX_MODES (29) bit (1) int static options (constant) init
41     ("0"b, "0"b, "0"b, "0"b, "0"b, "0"b, "0"b, "0"b,        /* edited -> red */
42      "0"b, "1"b, "1"b, "1"b, "0"b, "1"b, "1"b, "0"b,        /* vertsp -> capo */
43      "1"b, "1"b, "0"b, "1"b, "1"b, "0"b, "1"b, "0"b,        /* replay -> wake_tbl */
44      "1"b, "1"b, "1"b, "1"b, "1"b);                         /* iflow -> oddp */
45 
46 
47 /* END INCLUDE FILE ... tty_mode_names.incl.pl1 */