From e00ba096c8837abe85d366e0c1293c09dbe84d81 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 18 Aug 2021 03:29:15 -0400
Subject: Some bug fixes.

---
 lux-cl/source/program.lux | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lux-cl/source/program.lux')

diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux
index dfff7fb92..36ce1f0cd 100644
--- a/lux-cl/source/program.lux
+++ b/lux-cl/source/program.lux
@@ -243,7 +243,7 @@
           (#try.Failure error)
 
           (#try.Success member)
-          (recur (inc idx) (array.write! idx (:as Any member) output)))
+          (recur (++ idx) (array.write! idx (:as Any member) output)))
         (#try.Success output)))))
 
 (def: (read host_object)
-- 
cgit v1.2.3