--- a/SequenceableCollection.st	Tue Mar 24 19:05:08 2020 +0100
+++ b/SequenceableCollection.st	Thu Mar 26 15:05:07 2020 +0100
@@ -2879,7 +2879,7 @@
         This means that any modifications in the original are visible in the slice
         and vice versa (well, no: because the slice is readOnly)."
 
-    ^ self from:startIndex to:self size by:1
+    ^ self from:startIndex to:(self size) by:1
 
     "
      #(1 2 3 4 5 6 7) from:3
@@ -2931,7 +2931,9 @@
         This means that any modifications in the original are visible in the slice
         and vice versa (well, no: because the slice is readOnly)."
 
-    ^ self from:startIndex to:(startIndex + numberOfElements - 1)
+    ^ self 
+        from:startIndex to:(startIndex + numberOfElements - 1)
+        by:1 
 
     "
      #($a $b $c $d $e $f $g) from:2 count:3