1 /* BEGIN INCLUDE FILE ... aim_attributes.incl.pl1 */
 2 /* Created:  July 1982 by G. Palter */
 3 
 4 /* Definition of the AIM attributes on a Multics system */
 5 
 6 dcl  1 aim_attributes aligned based (aim_attributes_ptr),
 7        2 version character (8) unaligned,
 8        2 access_class_ceiling bit (72),                     /* maximum access class allowed on the system */
 9        2 levels (0 : 7),                                    /* the sensitivity levels */
10          3 long_name character (32) unaligned,
11          3 short_name character (8) unaligned,
12        2 categories (18),                                   /* the access categories */
13          3 long_name character (32) unaligned,
14          3 short_name character (8) unaligned;
15 
16 dcl  aim_attributes_ptr pointer;
17 
18 dcl  AIM_ATTRIBUTES_VERSION_1 character (8) static options (constant) initial ("aima_001");
19 
20 /* END INCLUDE FILE ... aim_attributes.incl.pl1 */