--- a/ReadOnlySequenceableCollection.st	Fri Jul 16 15:37:16 2004 +0200
+++ b/ReadOnlySequenceableCollection.st	Tue Jul 27 12:05:27 2004 +0200
@@ -9,6 +9,7 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
+
 "{ Package: 'stx:libbasic' }"
 
 SequenceableCollection subclass:#ReadOnlySequenceableCollection
@@ -59,10 +60,12 @@
 
     "
      (1 to:10) add:11   
+     (1 to:10) addAll:#(11 12)   
+     (1 to:10) remove:9    
+     (1 to:10) remove:9 ifAbsent:nil   
+     (1 to:10) removeAll:#(1 4)
+     (1 to:10) atAllPut:1
     "
-
-    "Created: / 31.10.2001 / 10:06:44 / cg"
-    "Modified: / 31.10.2001 / 10:08:15 / cg"
 !
 
 at:index put:anObject
@@ -82,7 +85,7 @@
     "Modified: / 31.10.2001 / 10:09:19 / cg"
 !
 
-remove:anObject
+remove:anObject ifAbsent:exceptionalValue
     "{ Pragma: +optSpace }"
 
     "catch remove message - cannot remove elements"
@@ -90,15 +93,12 @@
     self error:('elements cannot be removed from ' , self classNameWithArticle)
 
     "
-     (1 to:10) remove:9   
+     (1 to:10) remove:9 ifAbsent:nil  
     "
-
-    "Created: / 31.10.2001 / 10:07:12 / cg"
-    "Modified: / 31.10.2001 / 10:07:29 / cg"
 ! !
 
 !ReadOnlySequenceableCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ReadOnlySequenceableCollection.st,v 1.2 2001-11-16 10:11:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ReadOnlySequenceableCollection.st,v 1.3 2004-07-27 10:05:27 cg Exp $'
 ! !