check for null
This commit is contained in:
parent
91d29112b0
commit
df52ba811a
@ -3164,7 +3164,7 @@ install_clauses(ClauseDef *cls, PredEntry *ap, istack_entry *stack, yamop *beg,
|
|||||||
if (!sp->pos && (sp[-1].val == 0L || cls->Tag == sp[-1].val)) {
|
if (!sp->pos && (sp[-1].val == 0L || cls->Tag == sp[-1].val)) {
|
||||||
cls++;
|
cls++;
|
||||||
}
|
}
|
||||||
if (cl->ClCode == end || cl->ClCode == NULL) {
|
if (cl->ClCode == end) {
|
||||||
return cls-1;
|
return cls-1;
|
||||||
}
|
}
|
||||||
cl = cl->ClNext;
|
cl = cl->ClNext;
|
||||||
|
Reference in New Issue
Block a user