--- a/SharedCollection.st	Tue Jun 25 13:22:58 2013 +0200
+++ b/SharedCollection.st	Tue Jun 25 13:23:01 2013 +0200
@@ -221,13 +221,21 @@
     ^ realCollection species
 ! !
 
+!SharedCollection methodsFor:'testing'!
+
+isFixedSize
+    "return true if the receiver cannot grow"
+
+    ^ realCollection isFixedSize
+! !
+
 !SharedCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/SharedCollection.st,v 1.9 2013-03-19 09:22:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/SharedCollection.st,v 1.10 2013-06-25 11:23:01 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/SharedCollection.st,v 1.9 2013-03-19 09:22:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/SharedCollection.st,v 1.10 2013-06-25 11:23:01 cg Exp $'
 ! !