hg/stx-libbasic: comparison SeqColl.st

equal deleted inserted replaced

-:0d4c08ca9da3
+:5ac1b6b43600
 SequenceableCollection comment:'
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
-$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.27 1995-03-18 05:06:08 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.28 1995-05-18 15:10:08 claus Exp $
 '!
 !SequenceableCollection class methodsFor:'documentation'!
 copyright
 "
 !
 version
 "
-$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.27 1995-03-18 05:06:08 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.28 1995-05-18 15:10:08 claus Exp $
 "
 !
 documentation
 "
 "
 !
 removeFromIndex:startIndex toIndex:endIndex
 "remove the elements stored at indexes between startIndex and endIndex.
+Return the receiver.
+Returning the receiver is a historic leftover - it may at one
+time return a collection of the removed elements.
 Notice, that this is modifies the receiver - NOT a copy;
 therefore any other users of the receiver will also see this change.
 Also note, that it may be a slow operation for some collections,
 due to the grow:-message, which is inefficient for fixed size
 #(1 2 3 4 5 6 7 8 9 0) asOrderedCollection removeFromIndex:1 toIndex:10
 #(1 2 3 4 5 6 7 8 9 0) removeFromIndex:1 toIndex:10
 "
 !
-removeAtIndex:index
+removeAtIndex:anIndex
-"remove the argument stored at index and return it.
+"remove the element stored at anIndex. Return the removed object.
 Notice, that this is modifies the receiver NOT a copy.
 Also note, that it may be a slow operation for some collections,
 due to the grow:-message, which is inefficient for fixed size
 collections (i.e. for Strings and Arrays it is not recommened)."
 |element|
-element := self at:index.
+element := self at:anIndex.
-self removeIndex:index.
+self removeFromIndex:anIndex toIndex:anIndex.
 ^ element
 "
+#(1 2 3 4 5 6 7 8 9) asOrderedCollection removeAtIndex:3
+#(1 2 3 4 5) asOrderedCollection removeAtIndex:6
 #($a $b $c $d $e $f $g) removeAtIndex:3
 "
 !
 removeIndex:index
 collections (i.e. for Strings and Arrays it is not recommened)."
 self removeFromIndex:index toIndex:index
 "
+#(1 2 3 4 5 6 7 8 9) asOrderedCollection removeIndex:3
+#(1 2 3 4 5) asOrderedCollection removeIndex:6
 #($a $b $c $d $e $f $g) removeIndex:3
 "
 !
 removeFirst
 collections (i.e. for Strings and Arrays it is not recommened)."
 ^ self removeAtIndex:1
 "
 |a|
 a := #(1 2 3 4 5 6).
 a removeFirst.
 a
 "
 !
 removeLast
 "remove the last element of the receiver and return it.
 collections (i.e. for Strings and Arrays it is not recommened)."
 ^ self removeAtIndex:(self size)
 "
 |a|
 a := #(1 2 3 4 5 6).
 a removeLast.
 a
 "
 ! !

changeset 348	5ac1b6b43600
parent 308	f04744ef7b5d
child 356	6c5ce0e1e7a8