WeakArr.st
changeset 1127 990dc1e1065e
parent 981 6da206fcc1c4
child 1136 898af060dfde
--- a/WeakArr.st	Tue Mar 26 21:45:09 1996 +0100
+++ b/WeakArr.st	Wed Mar 27 02:25:29 1996 +0100
@@ -164,15 +164,14 @@
 	    ok = __addShadowObject(self, 0);
 #endif
 	    if (ok == false) {
-		extern int __oldGCGeneration__, __igcGeneration__;
-
 		/* 
 		 * hard stuff - need full collect
 		 * if this is the very first GC, assume that we are in
 		 * the startup phase. Then do no GC.
 		 * Heuristics showed, that this GC does not find much ...
 		 */
-		if ((__oldGCGeneration__ != 0) || (__igcGeneration__ != 0)) {
+		if ((__garbageCollectCount() != 0)
+		 || (__incrementalGCCount() != 0)) {
 		    __markAndSweepIfUseful(__context);
 		    ok = __addShadowObject(self, 0);
 		}
@@ -592,6 +591,6 @@
 !WeakArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/WeakArr.st,v 1.25 1996-02-20 23:43:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/WeakArr.st,v 1.26 1996-03-27 01:25:29 cg Exp $'
 ! !
 WeakArray initialize!