- {
- rset_isamc_parms parms;
-
- parms.key_size = sizeof(struct it_key);
- parms.cmp = key_compare_it;
- parms.pos = *isam_p;
- parms.is = zi->reg->isamc;
- parms.rset_term = rset_term_create (term, length, flags);
- return rset_create (rset_kind_isamc, &parms);
- }
-#if NEW_TRUNC
- else if (no < 10000)
- {
- rset_m_or_parms parms;
-
- parms.key_size = sizeof(struct it_key);
- parms.cmp = key_compare_it;
- parms.isc = zi->reg->isamc;
- parms.isam_positions = isam_p;
- parms.no_isam_positions = no;
- parms.no_save_positions = 100000;
- parms.rset_term = rset_term_create (term, length, flags);
- return rset_create (rset_kind_m_or, &parms);
- }
-#endif
- qsort (isam_p, no, sizeof(*isam_p), isamc_trunc_cmp);
- }
- else if (zi->reg->isamd)
- {
- if (no == 1)
- {
- rset_isamd_parms parms;
-
- logf(LOG_FATAL, "isam_d does not (currently) support truncs");
- abort();
- /* parms.pos = *isam_p; */
- parms.is = zi->reg->isamd;
- parms.rset_term = rset_term_create (term, length, flags);
- return rset_create (rset_kind_isamd, &parms);
- }
-#if NEW_TRUNC_NOT_DONE_FOR_ISAM_D
- else if (no < 10000)
- {
- rset_m_or_parms parms;
-
- parms.key_size = sizeof(struct it_key);
- parms.cmp = key_compare_it;
- parms.isc = 0;
- parms.isamd=zi->reg->isamd;
- parms.isam_positions = isam_p;
- parms.no_isam_positions = no;
- parms.no_save_positions = 100000;
- parms.rset_term = rset_term_create (term, length, flags);
- return rset_create (rset_kind_m_or, &parms);
- }
-#endif
- qsort (isam_p, no, sizeof(*isam_p), isamd_trunc_cmp);
+ return rsisamc_create(rset_nmem, kctrl, scope,
+ zi->reg->isamc, *isam_p, termid);
+ qsort(isam_p, no, sizeof(*isam_p), isamc_trunc_cmp);