1 /* BEGIN INCLUDE FILE its.incl.pl1
 2    modified 27 July 79 by JRDavis to add its_unsigned
 3    Internal format of ITS pointer, including ring-number field for follow-on processor */
 4 
 5 dcl 1 its based aligned,                                    /* declaration for ITS type pointer */
 6     2 pad1 bit (3) unaligned,
 7     2 segno bit (15) unaligned,                             /* segment number within the pointer */
 8     2 ringno bit (3) unaligned,                             /* ring number within the pointer */
 9     2 pad2 bit (9) unaligned,
10     2 its_mod bit (6) unaligned,                            /* should be 43(8) */
11 
12     2 offset bit (18) unaligned,                            /* word offset within the addressed segment */
13     2 pad3 bit (3) unaligned,
14     2 bit_offset bit (6) unaligned,                         /* bit offset within the word */
15     2 pad4 bit (3) unaligned,
16     2 mod bit (6) unaligned;                                /* further modification */
17 
18 dcl 1 itp based aligned,                                    /* declaration for ITP type pointer */
19     2 pr_no bit (3) unaligned,                              /* number of pointer register to use */
20     2 pad1 bit (27) unaligned,
21     2 itp_mod bit (6) unaligned,                            /* should be 41(8) */
22 
23     2 offset bit (18) unaligned,                            /* word offset from pointer register word offset */
24     2 pad2 bit (3) unaligned,
25     2 bit_offset bit (6) unaligned,                         /* bit offset relative to new word offset */
26     2 pad3 bit (3) unaligned,
27     2 mod bit (6) unaligned;                                /* further modification */
28 
29 
30 dcl 1 its_unsigned based aligned,                           /* just like its, but with unsigned binary */
31     2 pad1 bit (3) unaligned,
32     2 segno fixed bin (15) unsigned unaligned,
33     2 ringno fixed bin (3) unsigned unaligned,
34     2 pad2 bit (9) unaligned,
35     2 its_mod bit (6) unaligned,
36 
37     2 offset fixed bin (18) unsigned unaligned,
38     2 pad3 bit (3) unaligned,
39     2 bit_offset fixed bin (6) unsigned unaligned,
40     2 pad4 bit (3) unaligned,
41     2 mod bit (6) unaligned;
42 
43 dcl 1 itp_unsigned based aligned,                           /* just like itp, but with unsigned binary where appropriate */
44     2 pr_no fixed bin (3) unsigned unaligned,
45     2 pad1 bit (27) unaligned,
46     2 itp_mod bit (6) unaligned,
47 
48     2 offset fixed bin (18) unsigned unaligned,
49     2 pad2 bit (3) unaligned,
50     2 bit_offset fixed bin (6) unsigned unaligned,
51     2 pad3 bit (3) unaligned,
52     2 mod bit (6) unaligned;
53 
54 
55 dcl  ITS_MODIFIER bit (6) unaligned internal static options (constant) init ("43"b3);
56 dcl  ITP_MODIFIER bit (6) unaligned internal static options (constant) init ("41"b3);
57 
58 /* END INCLUDE FILE   its.incl.pl1 */