1 /* BEGIN mdbm_rm_sel_chain.incl.pl1 -- jaw, 5/25/78 */
 2 
 3 dcl 1 rm_sel_chain aligned based (rsc_ptr),                 /* "then thru" selection list entry */
 4     2 nattrs fixed bin,                                     /* no. comparison attrs */
 5     2 link_ptr ptr,                                         /* to parent link info */
 6     2 comp_proc ptr,                                        /* if non-null, comparison proc. */
 7     2 pattr_ptrs (sc_nattrs_init refer (rm_sel_chain.nattrs)) ptr, /* parent attr infos */
 8     2 cattr_ptrs (sc_nattrs_init refer (rm_sel_chain.nattrs)) ptr; /* comp. attr infos */
 9 
10 dcl  rsc_ptr ptr;
11 dcl  sc_nattrs_init fixed bin;
12 
13 /* END mdbm_rm_sel_chain.incl.pl1 */
14