1 /* BEGIN...   remote_ttt_info.incl.pl1 ... 5/78 */
 2 
 3 dcl  rttp ptr;                                              /* ptr to data structure */
 4 
 5 
 6 dcl 1 remote_ttt_info based (rttp) aligned,                 /* data */
 7     2 ttt_bits,                                             /* control bits */
 8      (3 escape_output bit (1),                              /* if on enables output escape processing */
 9       3 translate_output bit (1),                           /* if on enables output translation */
10       3 translate_input bit (1),                            /* if on enables input translation */
11       3 escape_input bit (1),                               /* if on enables input escape processing */
12       3 erase_input bit (1),                                /* if on enables input erase processing */
13       3 canonicalize_input bit (1),                         /* if on enables input canonicalization */
14       3 edited bit (1)) unal,                               /* if on enables edited escape processing */
15     2 terminal_type char (32),                              /* terminal type in TTT */
16     2 kill_char char (1),                                   /* specified kil character */
17     2 erase_char char (1),                                  /* and erase character */
18     2 ttt_ptrs,                                             /* ptr to various ttt tables */
19       3 input_mvtp ptr,                                     /* input translation table */
20       3 output_mvtp ptr,                                    /* output translation table */
21       3 input_tctp ptr,                                     /* input escape table */
22       3 output_tctp ptr,                                    /* output escape table */
23       3 specp ptr;                                          /* special table */
24 
25 /* END remote_ttt_info.incl.pl1 */