1 /* BEGIN mdbm_index.incl.pl1 -- jaw, 5/12/78 */
 2 
 3 dcl 1 index aligned based (ind_ptr),                        /* layout of mdbm_index for all file types */
 4     2 rel_id bit (12) unal,                                 /* relation id */
 5     2 index_id bit (8) unal,                                /* id of index within rel */
 6     2 mbz bit (7) unal,                                     /* pad to char. */
 7     2 index_val char (ind_val_len) unal;                    /* index value; max 253 chars */
 8 
 9 dcl  ind_ptr ptr;
10 dcl  ind_val_len fixed bin (35);
11 
12 /* END mdbm_index.incl.pl1 */
13