*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 29 Jan 1997 14:21:09 +0100
changeset 2299 fc326c7457b4
parent 2298 e75dabb791dc
child 2300 789e1dd0a0b7
*** empty log message ***
WeakDepDict.st
WeakDependencyDictionary.st
--- a/WeakDepDict.st	Wed Jan 29 14:19:11 1997 +0100
+++ b/WeakDepDict.st	Wed Jan 29 14:21:09 1997 +0100
@@ -153,11 +153,26 @@
     "
 
     "Created: 9.1.1997 / 00:00:28 / cg"
+    "Modified: 27.1.1997 / 15:54:28 / cg"
+! !
+
+!WeakDependencyDictionary methodsFor:'private'!
+
+keyContainerOfSize:n
+    "return a container for keys of size n.
+     use WeakArrays here."
+
+    |w|
+
+    w := WeakArray new:n.
+    ^ w
+
+    "Modified: 7.1.1997 / 17:01:15 / stefan"
     "Modified: 29.1.1997 / 14:17:38 / cg"
 ! !
 
 !WeakDependencyDictionary class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/WeakDepDict.st,v 1.5 1997-01-29 13:17:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/WeakDepDict.st,v 1.6 1997-01-29 13:21:09 cg Exp $'
 ! !
--- a/WeakDependencyDictionary.st	Wed Jan 29 14:19:11 1997 +0100
+++ b/WeakDependencyDictionary.st	Wed Jan 29 14:21:09 1997 +0100
@@ -153,11 +153,26 @@
     "
 
     "Created: 9.1.1997 / 00:00:28 / cg"
+    "Modified: 27.1.1997 / 15:54:28 / cg"
+! !
+
+!WeakDependencyDictionary methodsFor:'private'!
+
+keyContainerOfSize:n
+    "return a container for keys of size n.
+     use WeakArrays here."
+
+    |w|
+
+    w := WeakArray new:n.
+    ^ w
+
+    "Modified: 7.1.1997 / 17:01:15 / stefan"
     "Modified: 29.1.1997 / 14:17:38 / cg"
 ! !
 
 !WeakDependencyDictionary class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/WeakDependencyDictionary.st,v 1.5 1997-01-29 13:17:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/WeakDependencyDictionary.st,v 1.6 1997-01-29 13:21:09 cg Exp $'
 ! !