miscounting of variable-only clauses in groups might lead to bug in indexing

code.


git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1217 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2004-12-21 17:17:15 +00:00
parent a4f158fd33
commit c0c9dcef65

View File

@ -11,8 +11,11 @@
* File: index.c *
* comments: Indexing a Prolog predicate *
* *
* Last rev: $Date: 2004-12-06 04:50:22 $,$Author: vsc $ *
* Last rev: $Date: 2004-12-21 17:17:15 $,$Author: vsc $ *
* $Log: not supported by cvs2svn $
* Revision 1.110 2004/12/06 04:50:22 vsc
* fix bug in removing first clause of a try sequence (lu preds)
*
* Revision 1.109 2004/12/05 05:01:24 vsc
* try to reduce overheads when running with goal expansion enabled.
* CLPBN fixes
@ -2828,9 +2831,9 @@ groups_in(ClauseDef *min, ClauseDef *max, GroupDef *grp)
grp->LastClause = (min = clp)-1;
break;
}
clp++;
if (clp->Tag != (_var+1)*sizeof(CELL))
grp->VarClauses++;
clp++;
} while (TRUE);
} else {
grp->VarClauses = 0;