--- 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!