1 /* BEGIN INCLUDE FILE relocation_bits.incl.pl1 */
 2 
 3 /* This include file defines the relocation bits as bit (6) entities.  See
 4    also relbts.incl.pl1 and reloc_lower.incl.pl1. */
 5 
 6 dcl (     rc_a      initial("000000"b),           /* absolute */
 7           rc_t      initial("010000"b),           /* text */
 8           rc_nt     initial("010001"b),           /* negative text */
 9           rc_lp18   initial("010010"b),           /* linkage, 18 bit */
10           rc_nlp18  initial("010011"b),           /* negative link, 18 bit */
11           rc_lp15   initial("010100"b),           /* linkage, 15 bit */
12           rc_dp     initial("010101"b),           /* def section */
13           rc_s      initial("010110"b),           /* symbol segment */
14           rc_ns     initial("010111"b),           /* negative symbol */
15           rc_is18   initial("011000"b),           /* internal static 18 */
16           rc_is15   initial("011001"b),           /* internal static 15 */
17           rc_lb     initial("011000"b),           /* link block */
18           rc_nlb    initial("011001"b),           /* negative link block */
19           rc_sr     initial("011010"b),           /* self relative */
20           rc_e      initial("011111"b))           /* escape */
21           bit(6) int static options(constant);
22 
23 /* END INCLUDE FILE relocation_bits.incl.pl1 */