commentary
authorClaus Gittinger <cg@exept.de>
Fri, 12 Apr 1996 18:55:03 +0200
changeset 1164 38c54a4f1273
parent 1163 ad6f6532c54b
child 1165 c9108e9a4fdd
commentary
ArrColl.st
ArrayedCollection.st
Bag.st
LinkList.st
LinkedList.st
Set.st
--- a/ArrColl.st	Fri Apr 12 18:52:24 1996 +0200
+++ b/ArrColl.st	Fri Apr 12 18:55:03 1996 +0200
@@ -265,7 +265,8 @@
 !
 
 removeAll
-    "remove all elements from the receiver.
+    "remove all elements from the receiver. Returns the receiver.
+
      For ArrayedCollections (which are actually fixed-size collections),
      this is a slow operation, since a #become: is required to update
      all owners. Better use a collection which is prepared for growing
@@ -282,7 +283,7 @@
      #(1 2 3 4 5) removeAll    
     "
 
-    "Modified: 21.3.1996 / 15:28:08 / cg"
+    "Modified: 12.4.1996 / 13:34:21 / cg"
 ! !
 
 !ArrayedCollection methodsFor:'testing'!
@@ -311,5 +312,5 @@
 !ArrayedCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ArrColl.st,v 1.31 1996-03-21 14:29:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ArrColl.st,v 1.32 1996-04-12 16:53:29 cg Exp $'
 ! !
--- a/ArrayedCollection.st	Fri Apr 12 18:52:24 1996 +0200
+++ b/ArrayedCollection.st	Fri Apr 12 18:55:03 1996 +0200
@@ -265,7 +265,8 @@
 !
 
 removeAll
-    "remove all elements from the receiver.
+    "remove all elements from the receiver. Returns the receiver.
+
      For ArrayedCollections (which are actually fixed-size collections),
      this is a slow operation, since a #become: is required to update
      all owners. Better use a collection which is prepared for growing
@@ -282,7 +283,7 @@
      #(1 2 3 4 5) removeAll    
     "
 
-    "Modified: 21.3.1996 / 15:28:08 / cg"
+    "Modified: 12.4.1996 / 13:34:21 / cg"
 ! !
 
 !ArrayedCollection methodsFor:'testing'!
@@ -311,5 +312,5 @@
 !ArrayedCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ArrayedCollection.st,v 1.31 1996-03-21 14:29:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ArrayedCollection.st,v 1.32 1996-04-12 16:53:29 cg Exp $'
 ! !
--- a/Bag.st	Fri Apr 12 18:52:24 1996 +0200
+++ b/Bag.st	Fri Apr 12 18:55:03 1996 +0200
@@ -160,7 +160,8 @@
 !
 
 removeAll
-    "remove all objects from the receiver collection (i.e. make it empty)."
+    "remove all objects from the receiver collection (i.e. make it empty).
+     Returns the receiver."
 
     contents := contents species new.
 
@@ -176,7 +177,7 @@
      Transcript showCr:b
     "
 
-    "Modified: 21.3.1996 / 15:23:35 / cg"
+    "Modified: 12.4.1996 / 13:34:34 / cg"
 !
 
 removeAllOccurrencesOf:oldObject ifAbsent:anExceptionBlock
@@ -293,5 +294,5 @@
 !Bag class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Bag.st,v 1.19 1996-04-09 20:48:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Bag.st,v 1.20 1996-04-12 16:54:02 cg Exp $'
 ! !
--- a/LinkList.st	Fri Apr 12 18:52:24 1996 +0200
+++ b/LinkList.st	Fri Apr 12 18:55:03 1996 +0200
@@ -222,12 +222,13 @@
 !
 
 removeAll
-    "remove all elements from the sequence"
+    "remove all elements from the sequence. Returns the receiver."
 
     firstLink := lastLink := nil.
     numberOfNodes := 0
 
     "Created: 21.3.1996 / 15:24:38 / cg"
+    "Modified: 12.4.1996 / 13:34:53 / cg"
 !
 
 removeFirst
@@ -377,5 +378,5 @@
 !LinkedList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/LinkList.st,v 1.22 1996-03-21 14:24:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/LinkList.st,v 1.23 1996-04-12 16:54:32 cg Exp $'
 ! !
--- a/LinkedList.st	Fri Apr 12 18:52:24 1996 +0200
+++ b/LinkedList.st	Fri Apr 12 18:55:03 1996 +0200
@@ -222,12 +222,13 @@
 !
 
 removeAll
-    "remove all elements from the sequence"
+    "remove all elements from the sequence. Returns the receiver."
 
     firstLink := lastLink := nil.
     numberOfNodes := 0
 
     "Created: 21.3.1996 / 15:24:38 / cg"
+    "Modified: 12.4.1996 / 13:34:53 / cg"
 !
 
 removeFirst
@@ -377,5 +378,5 @@
 !LinkedList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LinkedList.st,v 1.22 1996-03-21 14:24:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LinkedList.st,v 1.23 1996-04-12 16:54:32 cg Exp $'
 ! !
--- a/Set.st	Fri Apr 12 18:52:24 1996 +0200
+++ b/Set.st	Fri Apr 12 18:55:03 1996 +0200
@@ -210,9 +210,11 @@
 !
 
 removeAll
-    "remove all elements from the receiver."
+    "remove all elements from the receiver. Returns the receiver."
 
     self setTally:7.
+
+    "Modified: 12.4.1996 / 13:35:06 / cg"
 !
 
 saveRemove:oldObject 
@@ -648,6 +650,6 @@
 !Set class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.33 1996-04-09 20:47:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Set.st,v 1.34 1996-04-12 16:55:03 cg Exp $'
 ! !
 Set initialize!