1 /* Begin include file sty_mpx_data.incl.pl1 */ 2 3 /* Written by Charlie Hornig (?) */ 4 /* Modified April 1983 by Robert Coren to add access_class information */ 5 6 /* format: style3 */ 7 dcl sty_mpx_data_ptr ptr; /* main database ptr */ 8 dcl sty_mpx_data_nchan fixed bin; /* number of multiplexed channels */ 9 dcl 1 sty_mpx_data aligned based (sty_mpx_data_ptr), 10 2 devx fixed bin, /* index of major channel */ 11 2 flags, 12 3 started bit (1) unaligned, /* we can accept dial_up's */ 13 2 n_channels fixed bin, 14 2 n_pairs fixed bin, 15 2 pdes (sty_mpx_data_nchan refer (sty_mpx_data.n_channels)) like pde; 16 17 dcl pdep ptr; 18 dcl 1 pde aligned based (pdep), /* for each PTY channel */ 19 2 devx fixed bin, /* this channel's devx */ 20 2 flags, 21 3 listen bit (1) unaligned, /* someone is interested */ 22 3 wru bit (1) unaligned, /* asked for answerback */ 23 3 end_of_page bit (1) unaligned, /* waiting for response to EOP */ 24 3 notify_modes bit (1) unaligned, /* wants to know if foreign modes change */ 25 3 output_ready bit (1) unaligned, /* we have sent SEND_OUTPUT */ 26 3 access_class_set bit (1) unaligned, /* access_class has been set by "set_required_access_class" order */ 27 2 words uns fixed bin (18), /* words we have queued */ 28 2 (head, tail) uns fixed bin (18), /* output queue */ 29 2 mode_ptr ptr, /* ptr to mode structure in tty_area */ 30 2 location char (64), /* answerback (from destination to dial_out */ 31 2 access_class bit (72) aligned; /* access class associated with channel (if access_class_set = "1"b) */ 32 33 /* End include file sty_mpx_data.incl.pl1 */