avoid unnecessart work.

2011-09-20 09:53:06 +01:00 · 2011-09-20 09:53:06 +01:00 · abf74a8aa9
commit abf74a8aa9
parent 5b0874be32
1 changed files with 1 additions and 1 deletions
--- a/C/attvar.c
+++ b/C/attvar.c
@ -897,7 +897,7 @@ AllAttVars( USES_REGS1 ) {
  CELL *pt = H0;
  CELL *myH = H;
  
-  while (pt < H) {
+  while (pt < myH) {
    switch(*pt) {
    case (CELL)FunctorAttVar:
      if (IsUnboundVar(pt+1)) {