unify indexing of dynamic and static clauses

This commit is contained in:
Vitor Santos Costa 2012-12-07 23:43:14 +00:00
parent f0b44b9b77
commit e05ee9670c

View File

@ -2367,7 +2367,7 @@ cls_head_info(ClauseDef *min, ClauseDef *max, UInt argno, int in_idb)
}
} else {
while (cl <= max) {
add_head_info(cl, argno);
add_info(cl, argno);
/* if (IsVarTerm(cl->Tag)) cl->Tag = (CELL)NULL; */
cl++;
}