handle slowdown when retracting clauses.

2011-06-24 21:08:22 +01:00
parent d4ed02bdd3
commit e74a25d366
10 changed files with 76 additions and 64 deletions
--- a/C/dbase.c
+++ b/C/dbase.c
@@ -3722,8 +3722,8 @@ index_sz(LogUpdIndex *x)
      endop = Yap_opcode(_profiled_trust_logical);
    else
      endop = Yap_opcode(_trust_logical);
-    start = start->u.Ills.l1;
-    if (start->u.Ills.s) do {
+    start = start->u.Illss.l1;
+    if (start->u.Illss.s) do {
      sz += (UInt)NEXTOP((yamop*)NULL,OtaLl);
      op1 = start->opc;
      count++;