Function csp_set_intersection

Engine/cs_par_base.c:548–585

}

struct set_t *csp_set_intersection(CSOUND *csound, struct set_t *first,
                         struct set_t *second)
{
    int ctr = 0;
    int first_len;
    struct set_t *result;
#ifdef SET_DEBUG
    if (UNLIKELY(first == NULL))
      csound->Die(csound, "Invalid NULL Parameter first");
    if (UNLIKELY(!set_is_set(first)))
      csound->Die(csound, "Invalid Parameter set not a first");
    if (UNLIKELY(second == NULL))
      csound->Die(csound, "Invalid NULL Parameter second");
    if (UNLIKELY(!set_is_set(second)))
      csound->Die(csound, "Invalid Parameter set not a second");
    if (UNLIKELY(result == NULL))
      csound->Die(csound, "Invalid NULL Parameter result");
    if (UNLIKELY(first->ele_eq_func != second->ele_eq_func))
      csound->Die(csound,
                  "Invalid sets for comparison (different equality)");
#endif

    result = csp_set_alloc(csound,
                            first->ele_eq_func, first->ele_print_func);

    first_len = csp_set_count(first);

    while (ctr < first_len) {
      void *data = NULL;
      data = csp_set_get_num(first, ctr);
      if (csp_set_exists(second, data)) {
        csp_set_add(csound, result, data);
      }
      ctr++;
    }

    return result;
}