WeakArray.st
branchjv
changeset 18045 c0c600e0d3b3
parent 18011 deb0c3355881
parent 15094 d8da305e02f8
child 18120 e3a375d5f6a8
--- a/WeakArray.st	Tue Apr 16 14:27:04 2013 +0200
+++ b/WeakArray.st	Thu Apr 18 20:41:50 2013 +0200
@@ -121,11 +121,12 @@
 initialize
     "setup the private signal"
 
+    self flags:(Behavior flagWeakPointers).     "/ read the comment in basicNew:
     RegistrationFailedSignal isNil ifTrue:[
-	RegistrationFailedSignal := Error newSignalMayProceed:true.
-	RegistrationFailedSignal nameClass:self message:#registrationFailedSignal.
-	RegistrationFailedSignal notifierString:'weakArray registration failed'.
-    ]
+        RegistrationFailedSignal := Error newSignalMayProceed:true.
+        RegistrationFailedSignal nameClass:self message:#registrationFailedSignal.
+        RegistrationFailedSignal notifierString:'weakArray registration failed'.
+    ].
 ! !
 
 !WeakArray class methodsFor:'instance creation'!
@@ -1016,11 +1017,12 @@
 !WeakArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.68 2012-11-24 12:55:25 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.69 2013-04-16 12:46:35 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.68 2012-11-24 12:55:25 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/WeakArray.st,v 1.69 2013-04-16 12:46:35 cg Exp $'
 ! !
 
+
 WeakArray initialize!