Fix off-by-one error in 'foreachIndex'

effekt-lang · Jan 16, 2024 · 29819d5 · 29819d5
1 parent c1f0dfd
commit 29819d5
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/libraries/chez/common/immutable/list.effekt b/libraries/chez/common/immutable/list.effekt
@@ -127,7 +127,7 @@ def foreach[A](l: List[A]) { f: A => Unit / Control } : Unit = {
 // O(N)
 def foreachIndex[A](list: List[A]){ f: (Int, A) => Unit / Control }: Unit = {
   var remainder = list
-  var i = 0
+  var i = -1
   loop {
     if (not(remainder.isEmpty)) {
       remainder match {

diff --git a/libraries/js/immutable/list.effekt b/libraries/js/immutable/list.effekt
@@ -127,7 +127,7 @@ def foreach[A](l: List[A]) { f: A => Unit / Control } : Unit = {
 // O(N)
 def foreachIndex[A](list: List[A]){ f: (Int, A) => Unit / Control }: Unit = {
   var remainder = list
-  var i = 0
+  var i = -1
   loop {
     if (not(remainder.isEmpty)) {
       remainder match {