--- a/WeakArr.st	Fri Jan 17 21:59:50 1997 +0100
+++ b/WeakArr.st	Sat Jan 18 00:27:55 1997 +0100
@@ -288,7 +288,7 @@
      - reimplemented for IGC readBarrier. 
      You dont have to understand this."
 
-    |home element|
+    |element|
 %{
     REGISTER int index;
     unsigned int nIndex;
@@ -323,7 +323,7 @@
 			if (__isNonNilObject(element)) element = __WEAK_READ__(self, element);
 			(*codeVal)(BLOCK_ARG, element);
 		    }
-		    element = home = nil;
+		    element = nil;
 		    RETURN (self);
 		}
 	    }
@@ -371,7 +371,7 @@
 		}
 	    }
 	} 
-	element = home = nil;
+	element = nil;
 	RETURN (self);
 
 #       undef BLOCK_ARG
@@ -393,7 +393,7 @@
 			    nil, &val, 
 			    element);
     }
-    element = home = nil;
+    element = nil;
 %}.
     ^ self
 !
@@ -735,6 +735,6 @@
 !WeakArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/WeakArr.st,v 1.40 1997-01-17 15:45:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/WeakArr.st,v 1.41 1997-01-17 23:27:55 cg Exp $'
 ! !
 WeakArray initialize!

--- a/WeakArray.st	Fri Jan 17 21:59:50 1997 +0100
+++ b/WeakArray.st	Sat Jan 18 00:27:55 1997 +0100
@@ -288,7 +288,7 @@
      - reimplemented for IGC readBarrier. 
      You dont have to understand this."
 
-    |home element|
+    |element|
 %{
     REGISTER int index;
     unsigned int nIndex;
@@ -323,7 +323,7 @@
 			if (__isNonNilObject(element)) element = __WEAK_READ__(self, element);
 			(*codeVal)(BLOCK_ARG, element);
 		    }
-		    element = home = nil;
+		    element = nil;
 		    RETURN (self);
 		}
 	    }
@@ -371,7 +371,7 @@
 		}
 	    }
 	} 
-	element = home = nil;
+	element = nil;
 	RETURN (self);
 
 #       undef BLOCK_ARG
@@ -393,7 +393,7 @@
 			    nil, &val, 
 			    element);
     }
-    element = home = nil;
+    element = nil;
 %}.
     ^ self
 !
@@ -735,6 +735,6 @@
 !WeakArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.40 1997-01-17 15:45:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.41 1997-01-17 23:27:55 cg Exp $'
 ! !
 WeakArray initialize!