1 /*        BEGIN INCLUDE FILE ... db_inst.incl.pl1  Last modified Nov 72 - WSS. */
 2 
 3 
 4 /*        PL/I  definitions of an instruction word.  There are two definitions.
 5 *         One defines a full 18 bit offset field (now meaningful with 256K segments)
 6 *         and the other defines an instruction with a pointer register field and a
 7 *         15 bit offset field.
 8 */
 9 
10 dcl       ilc_ptr     ptr;                        /* Pointer to the instruction word. */
11 
12 
13 dcl     1 instr       based (ilc_ptr)   aligned,
14          (2  offset   fixed bin (17),             /* Full 18 bit offset.  No pr field. */
15           2  opcode   bit (10),                   /* Instruction opcode. */
16           2  inhibit  bit (1),                    /* ON => interrupts inhibitted. */
17           2  pr_bit   bit (1),                    /* ON => instruction has  pr  field. */
18           2  tag      bit (6))  unaligned;        /* Tag field. */
19 
20 
21 dcl     1 instr_pr    based (ilc_ptr)   aligned,
22          (2  pr       bit (3),                    /* Pointer register field. */
23           2  offset   fixed bin (14),             /* 15 bit offset due to pr field. */
24           2  pad      bit (18))  unaligned;
25 
26 
27 /*        END OF INCLUDE FILE ... db_inst.incl.pl1          */