1 /*  START OF:       meter_limits.incl.pl1                     *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  */
 2 
 3 /* Table of metering limits for filtering metering_ring_zero_peek_
 4    requests.
 5 
 6    Written December 1980 by J. Bongiovanni                                                                    */
 7 
 8 
 9 dcl mtablep ptr;
10 dcl mentryp ptr;
11 
12 dcl 1 meter_limits_table aligned based (mtablep),           /* table header                                   */
13     2 initialized bit (1),                                  /* on=>table is valid                             */
14     2 high_seg_no fixed bin,                                /* highest segment number in table                */
15     2 thread_head (0:0 refer (high_seg_no)) fixed bin (18); /* begin thread of entries this segment           */
16 
17 dcl 1 meter_limits_entry aligned based (mentryp),           /* defines a region which can be accessed         */
18     2 thread fixed bin (18),                                /* next entry this segment (0=>none)              */
19     2 begin_offset fixed bin (18) unsigned unal,            /* begin word of accessible region                */
20     2 end_offset fixed bin (18) unsigned unal;              /* last word of accessible region                 */
21 
22 
23 
24 /*  END OF:         meter_limits.incl.pl1                     *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  */