SharedCollection.st
changeset 3212 5c1eba42b00f
parent 3022 869f18437363
child 3213 53857e1b18a4
--- a/SharedCollection.st	Fri Mar 07 23:07:11 2014 +0100
+++ b/SharedCollection.st	Wed Mar 26 11:16:10 2014 +0100
@@ -84,6 +84,14 @@
     ^ self.
 ! !
 
+!SharedCollection methodsFor:'copying'!
+
+shallowCopy
+    "analog to species - copy the real collection"
+
+    ^ realCollection shallowCopy
+! !
+
 !SharedCollection methodsFor:'initialization'!
 
 initializeFor:aCollection
@@ -212,7 +220,7 @@
     ^ rslt
 ! !
 
-!SharedCollection methodsFor:'special'!
+!SharedCollection methodsFor:'queries'!
 
 species
     "returns non shared collections"
@@ -231,10 +239,10 @@
 !SharedCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/SharedCollection.st,v 1.11 2013-06-26 08:00:52 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/SharedCollection.st,v 1.12 2014-03-26 10:16:10 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/SharedCollection.st,v 1.11 2013-06-26 08:00:52 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/SharedCollection.st,v 1.12 2014-03-26 10:16:10 stefan Exp $'
 ! !