consider case where we are not indexed.
This commit is contained in:
parent
e5a62a8843
commit
1b34fde09e
@ -5979,7 +5979,7 @@ Yap_RemoveClauseFromIndex(PredEntry *ap, yamop *beg) {
|
|||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
ap->OpcodeOfPred = Yap_opcode(_op_fail);
|
ap->OpcodeOfPred = Yap_opcode(_op_fail);
|
||||||
} else {
|
} else if (ap->PredFlags & IndexedPredFlag) {
|
||||||
remove_from_index(ap, sp, &cl, beg, last, &cint);
|
remove_from_index(ap, sp, &cl, beg, last, &cint);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
Reference in New Issue
Block a user