--- a/SharedCollection.st	Mon May 08 15:11:06 2006 +0200
+++ b/SharedCollection.st	Mon May 08 15:13:02 2006 +0200
@@ -74,6 +74,12 @@
     ^ self new initializeFor:aCollection
 ! !
 
+!SharedCollection methodsFor:'converting'!
+
+asSharedCollection
+    ^ self.
+! !
+
 !SharedCollection methodsFor:'initialization'!
 
 initializeFor:aCollection
@@ -128,5 +134,5 @@
 !SharedCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/SharedCollection.st,v 1.1 2006-05-08 13:09:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/SharedCollection.st,v 1.2 2006-05-08 13:13:02 cg Exp $'
 ! !