*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Sun, 09 Nov 2008 12:26:36 +0100
changeset 11330 4a1580833cb5
parent 11329 28cf7ddd8b44
child 11331 443e9f4efd2f
*** empty log message ***
OrderedCollection.st
--- a/OrderedCollection.st	Sun Nov 09 12:25:47 2008 +0100
+++ b/OrderedCollection.st	Sun Nov 09 12:26:36 2008 +0100
@@ -969,8 +969,8 @@
 !
 
 removeLast:n
-    "remove the last n elements from the collection; 
-     Return a collection of removed  elements."
+    "remove the last n elements from the receiver collection. 
+     Return a collection of removed elements."
 
     |mySize ret|
 
@@ -1001,6 +1001,8 @@
      (OrderedCollection withAll:#(1 2 3 4 5)) removeLast:0; yourself 
      (OrderedCollection withAll:#(1 2 3 4 5)) removeLast:6; yourself 
      (SortedCollection withAll:#(5 4 3 2 1)) removeLast:2; yourself  
+     (SortedCollection withAll:#(5 4 3 2 1)) removeLast:0; yourself  
+     (SortedCollection withAll:#(5 4 3 2 1)) removeLast:0  
     "
 
     "Modified: 12.4.1996 / 13:39:12 / cg"
@@ -1914,5 +1916,5 @@
 !OrderedCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/OrderedCollection.st,v 1.96 2008-10-22 15:11:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/OrderedCollection.st,v 1.97 2008-11-09 11:26:36 cg Exp $'
 ! !