if (up != NULL)
memmove(up + i, *p + size * n1, size);
} else {
- if (DeleteArray(p, ip, size, n1, 1, (up ? up + i : NULL)) == NULL)
- return n2;
+ DeleteArray(p, ip, size, n1, 1, (up ? up + i : NULL));
}
n2++;
}
for (j = 0; j < n; j++) {
if (types[j] < kAtomTypeMinimum)
continue;
- if (types[j] == kAtomTypeWildcard || types[j] == api->type) {
+ if (types[j] == kAtomTypeWildcard || types[j] == api->type || types[j] == api->type % kAtomTypeVariantBase) {
retval = 1;
break;
}