1 /* BEGIN INCLUDE FILE ... ptw.adp.incl.pl1 ... 02/11/81, for ADP conversion */
 2 /* Note: This include file has an ALM counterpart made with cif. Keep it up to date */
 3 
 4 dcl 1 adp_core_ptw aligned based (ptp),                     /* PTW for in-core page */
 5     2 pad1 bit (2) unaligned,
 6     2 frame fixed bin (16) unsigned unaligned,              /* Core frame number */
 7     2 flags like adp_ptw_flags unaligned;                   /* add_type = "00"b; */
 8 
 9 dcl 1 adp_ptw aligned based (ptp),                          /* General declaration for out-of-core PTW */
10     2 add bit (18) unaligned,
11     2 flags like adp_ptw_flags unaligned;
12 
13 dcl 1 adp_special_ptw aligned based (ptp) like adp_ptw;     /* Page is somewhere peculiar -- add_type = "01"b */
14 dcl 1 adp_real_disk_ptw aligned based (ptp) like adp_ptw;   /* PTW for page actually on disk -- add_type = "10"b */
15 dcl 1 adp_null_disk_ptw aligned based (ptp) like adp_ptw;   /* PTW for page not yet on disk -- add_type = "11"b */
16 
17 dcl 1 adp_ptw_flags unaligned based,                        /* Common lower halfword for ADP PTW */
18    (2 add_type bit (4),                                     /* See specific declarations */
19     2 er bit (1),                                           /* error on last page I/O (also used by post-purge as temp) */
20     2 wired bit (1),                                        /* page is to remain in core */
21     2 os bit (1),                                           /* page is out-of-service (I/O in progress) */
22     2 phu1 bit (1),                                         /* page has been used in the quantum */
23     2 phm1 bit (1),                                         /* Cumulative OR of hardware phm's */
24 
25     2 unusable1 bit (3),                                    /* Shares hardware byte */
26     2 valid bit (1),                                        /* "1"b if page is in core */
27     2 write bit (1),                                        /* "1"b if page may be written into */
28     2 unusable2 bit (1),                                    /* Shares hardware byte */
29     2 iox bit (1),                                          /* "1"b if page is to be present to IOX */
30     2 phm bit (1),                                          /* page has been modified bit */
31     2 phu bit (1)) unaligned;                               /* page has been used bit */
32 
33 /* END INCLUDE FILE ... ptw.adp.incl.pl1 */