--- a/SequenceWithSentinel.st	Tue Jun 25 13:23:52 2013 +0200
+++ b/SequenceWithSentinel.st	Tue Jun 25 13:23:55 2013 +0200
@@ -143,8 +143,17 @@
     "Created: / 27-03-2007 / 11:37:24 / cg"
 ! !
 
+!SequenceWithSentinel methodsFor:'testing'!
+
+isFixedSize
+    "return true if the receiver cannot grow"
+
+    ^ sequence isFixedSize
+! !
+
 !SequenceWithSentinel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/SequenceWithSentinel.st,v 1.1 2007-03-27 09:57:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/SequenceWithSentinel.st,v 1.2 2013-06-25 11:23:55 cg Exp $'
 ! !
+