we don't need to wakeup variables that have no attributes, even if they have been bound.

2010-03-15 14:17:30 +00:00
parent 117647f552
commit 8b6b9e9ac3
3 changed files with 15 additions and 14 deletions
--- a/C/attvar.c
+++ b/C/attvar.c
@@ -137,6 +137,10 @@ WakeAttVar(CELL* pt1, CELL reg2)
  CELL *myH = H;
  CELL *bind_ptr;

+  if (IsVarTerm(Deref(attv->Atts))) {
+    /* no attributes to wake */
+    return;
+  }
  if (IsVarTerm(reg2)) {
    if (pt1 == VarOfTerm(reg2))
      return;