Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
.
authorclaus
Thu, 18 May 1995 17:33:58 +0200
changeset 349 33d5e92c4ce7
parent 348 5ac1b6b43600
child 350 54d513b45f51
.
OrdColl.st file | annotate | diff | comparison | revisions
OrderedCollection.st file | annotate | diff | comparison | revisions 
--- a/OrdColl.st	Thu May 18 17:10:35 1995 +0200
+++ b/OrdColl.st	Thu May 18 17:33:58 1995 +0200
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/Attic/OrdColl.st,v 1.25 1995-05-18 15:09:50 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/OrdColl.st,v 1.26 1995-05-18 15:33:58 claus Exp $
 '!
 
 !OrderedCollection class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/Attic/OrdColl.st,v 1.25 1995-05-18 15:09:50 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/OrdColl.st,v 1.26 1995-05-18 15:33:58 claus Exp $
 "
 !
 
@@ -315,8 +315,8 @@
 
     |nDeleted|
 
-    (startIndex < firstIndex
-    or:[stopIndex > lastIndex]) ifTrue:[
+    (startIndex < 1
+    or:[stopIndex > self size]) ifTrue:[
 	^ self notEnoughElementsError
     ].
     nDeleted := stopIndex - startIndex + 1.
--- a/OrderedCollection.st	Thu May 18 17:10:35 1995 +0200
+++ b/OrderedCollection.st	Thu May 18 17:33:58 1995 +0200
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/OrderedCollection.st,v 1.25 1995-05-18 15:09:50 claus Exp $
+$Header: /cvs/stx/stx/libbasic/OrderedCollection.st,v 1.26 1995-05-18 15:33:58 claus Exp $
 '!
 
 !OrderedCollection class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/OrderedCollection.st,v 1.25 1995-05-18 15:09:50 claus Exp $
+$Header: /cvs/stx/stx/libbasic/OrderedCollection.st,v 1.26 1995-05-18 15:33:58 claus Exp $
 "
 !
 
@@ -315,8 +315,8 @@
 
     |nDeleted|
 
-    (startIndex < firstIndex
-    or:[stopIndex > lastIndex]) ifTrue:[
+    (startIndex < 1
+    or:[stopIndex > self size]) ifTrue:[
 	^ self notEnoughElementsError
     ].
     nDeleted := stopIndex - startIndex + 1.
hg/stx-libbasic