1 
 2 /* Begin include file ...... iom_lpw.incl.pl1 */
 3 /*        modified 3/4/75 by Noel I. Morris       */
 4 
 5 dcl  lpwp ptr,                                              /* pointer to LPW */
 6      lpwep ptr;                                             /* pointer to LPW extension */
 7 
 8 dcl 1 lpw based (lpwp) aligned,                             /* List Pointer Word */
 9      (2 dcw_addr bit (18),                                  /* address of DCW list */
10       2 res bit (1),                                        /* "1"b to restrict use of IDCW */
11       2 iom_rel bit (1),                                    /* IOM controlled copy of REL bit */
12       2 ae bit (1),                                         /* "1"b to use addr extension for DCW list service */
13       2 nc bit (1),                                         /* "1"b to supress LPW tally update */
14       2 tal bit (1),                                        /* "1"b to enable tally runout fault */
15       2 rel bit (1),                                        /* "1"b to set relative mode */
16       2 tally bit (12)) unal;                               /* LPW tally */
17 
18 dcl 1 lpw_ext based (lpwep) aligned,                        /* List Pointer Word Extension */
19      (2 base bit (9),                                       /* relative addressing base */
20       2 bound bit (9),                                      /* relative addressing bound */
21       2 idcwp bit (18)) unal;                               /* address of last IDCW */
22 
23 /* End of include file ...... iom_lpw.incl.pl1 */
24