1 /* BEGIN INCLUDE FILE...tty_access_class.incl.pl1 */ 2 3 4 5 /****^ HISTORY COMMENTS: 6 1) change(85-07-29,Swenson), approve(86-08-13,MCR7512), 7 audit(86-08-13,EJSharpe), install(86-09-08,MR12.0-1150): 8 Modified to align an unaligned bit value to get around compiler's padded 9 reference bug. 10 END HISTORY COMMENTS */ 11 12 13 /* Defines structure used by "get_required_access_class" control order */ 14 15 /* History: 16 1983-04-25, Robert Coren. 17 */ 18 19 dcl tty_access_class_ptr pointer; 20 21 dcl 1 tty_access_class aligned based (tty_access_class_ptr), 22 2 access_class bit (72), /* access class assigned to the channel */ 23 2 access_class_set bit (1) aligned; /* "1"b => there is an access class associated with the channel */ 24 25 /* NOTE: if access_class_set = "0"b, access_class field is meaningless */ 26 27 /* END INCLUDE FILE...tty_access_class.incl.pl1 */