1 /* BEGIN INCLUDE FILE gcos_contrl_tables_data.incl.pl1   (Wardd Multics)  07/26/81 1351.1 mst Sun */
 2 
 3 dcl 1 atentry aligned based (actptr)              /* structure describing activity table entry */
 4 ,     2 act_switches bit(18) unal                 /* misc switches used in processing the card */
 5 ,     2 vib_offset  fixed bin(18)unsigned unal    /* offset from base of gcos_control_tables_ of associated */
 6                                                   /* variable information block */
 7 ,     2 nondolr     char(4)                       /* file where following non$ cards */
 8                                                   /* are to be written */
 9 ,     2 canon_sw    fixed bin(35)                 /* setting for canonicalizer switch */
10 ;
11 
12 dcl 1 optab (j) aligned based (actptr)            /* struc. descr. option table entry */
13 ,     2 option_type char(8)                       /* option name for lookup */
14 ,     2 idx         fixed bin(18)unsigned unal    /* index for use in op_lbl xfer vector */
15 ,     2 bits        bit(18) unal                  /* setting for psw */
16 ;
17 
18           /* option types. Indexed by number in */
19           /* option table entry.                   */
20 
21 dcl 1 vib aligned based (actptr)                  /* structure describing fixed portion of */
22                                                   /* variable information block */
23 ,     2 activity    char(8)                       /* activity name */
24 ,     2 psw         bit(18) unal                  /* initial psw settings */
25 ,     2 time        fixed bin(18)unsigned unal    /* time limit */
26 ,     2 storage     fixed bin(18)unsigned unal    /* storage limit */
27 ,     2 sysout      fixed bin(18)unsigned unal    /* sysout line limit */
28 ,     2 op_ofs      fixed bin(18)unsigned unal    /* option table offset in gcos_control_tables_ */
29 ,     2 op_len      fixed bin(18)unsigned unal    /* length of option table */
30 ;
31 
32 dcl 1 vib_file aligned based (actptr)             /* structure for each entry in variable */
33                                                   /* portion of variable information block */
34 ,     2 control     bit(18) unal                  /* fib settings */
35 ,     2 filecode    char(2) unal                  /* file code of file req'd by activity */
36 ;
37 
38 /*   END INCLUDE FILE gcos_contrl_tables_data.incl.pl1 */