make sure there is indexing code after a record_at
This commit is contained in:
parent
2edc06b6a2
commit
fa9425cd21
@ -1926,6 +1926,10 @@ record_lu_at(int position, LogUpdClause *ocl, Term t)
|
|||||||
ocl->ClNext = cl;
|
ocl->ClNext = cl;
|
||||||
}
|
}
|
||||||
pe->cs.p_code.NOfClauses++;
|
pe->cs.p_code.NOfClauses++;
|
||||||
|
if (pe->cs.p_code.NOfClauses > 1) {
|
||||||
|
pe->OpcodeOfPred = INDEX_OPCODE;
|
||||||
|
pe->CodeOfPred = (yamop *)(&(pe->OpcodeOfPred));
|
||||||
|
}
|
||||||
UNLOCK(pe->PELock);
|
UNLOCK(pe->PELock);
|
||||||
return cl;
|
return cl;
|
||||||
}
|
}
|
||||||
|
Reference in New Issue
Block a user