1 
 2 /*             "net_conversion_dcls.incl.pl1" -- include file to declare the    */
 3 /*        communication structures used by the network conversion routines.     */
 4 
 5 /*        Originally created by D. M. Wells 1973, December 17.                  */
 6 
 7      declare
 8           1 device_state_template aligned based,
 9              2 version_number fixed binary (17),
10              2 driving_tables aligned,
11                 3 device_table_ptr pointer,                 /* points to the current device table header      */
12                 3 output_table_ptr pointer,                 /* points to the current output table             */
13                 3 input_table_ptr pointer,                  /* points ot the current input table              */
14              2 non_constant_parameters aligned,
15                 3 line_length fixed binary (24),            /* the maximum number of columns to type out      */
16                 3 page_length fixed binary (24),            /* the maximum number of lines per page           */
17                 3 mode_string unaligned,                    /* modes that for one reason or another are not   */
18                                                             /* done by entries in the device table            */
19                    4 hor_tabs_out bit (1),                  /* whether we can use horizontal tabs on output   */
20                    4 hor_tabs_in bit (1),                   /* whether we should not translate tabs on input  */
21              2 terminal_state aligned,
22                 3 out_of_position bit (1) unaligned,        /* whether everything is in proper place          */
23                 3 in_page_wait bit (1) unaligned,           /* whether we are waiting on a Page Go Ahead      */
24 
25                 3 actual_column fixed binary (24),          /* the column the next character will be typed in */
26                 3 desired_column fixed binary (24),         /* the column we should be in according to stream */
27 
28                 3 actual_line fixed binary (24),            /* the line the next character will be typed in   */
29                 3 desired_line fixed binary (24);           /* the line we should be in according to stream   */
30 
31      declare
32           1 canon_info_template aligned based,
33              2 version_number fixed binary (17),            /* the version number of this version is 2        */
34              2 flags aligned,
35                 3 do_can bit (1) unaligned,                 /* whether or not to do canonicalization          */
36                 3 do_erkl bit (1) unaligned,                /* whether or not to erase-kill processing        */
37                 3 do_esc bit (1) unaligned,                 /* whether or not to do escape processing         */
38                 3 do_tty33 bit (1) unaligned,               /* whether or not to do upper/lower case mapping  */
39                 3 allow_tabs bit (1) unaligned,             /* whether or not to allow tabs to filter through */
40              2 special_chars aligned,
41                 3 escape bit (9) unaligned,
42                 3 erase bit (9) unaligned,
43                 3 kill bit (9) unaligned,
44              2 tabs_info aligned,
45                 3 tab_string_length fixed binary (24),
46                 3 tab_string_ptr pointer;
47 
48 /*        end of include file "net_conversion_dcls.incl.pl1"                    */
49