From bf53ee92fc3c33a4885aa227e55d24f7ba3cb2c4 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 16 Mar 2022 08:37:23 -0400
Subject: De-sigil-ification: prefix :

---
 lux-jvm/source/luxc/lang/translation/jvm/loop.lux | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

(limited to 'lux-jvm/source/luxc/lang/translation/jvm/loop.lux')

diff --git a/lux-jvm/source/luxc/lang/translation/jvm/loop.lux b/lux-jvm/source/luxc/lang/translation/jvm/loop.lux
index 92b8c0286..4449b3606 100644
--- a/lux-jvm/source/luxc/lang/translation/jvm/loop.lux
+++ b/lux-jvm/source/luxc/lang/translation/jvm/loop.lux
@@ -53,16 +53,16 @@
      ... will refer to the new value of X, instead of the old value, and
      ... shouldn't be the case.
      valuesI+ (monad.each @ (function (_ [register argS])
-                              (: (Operation Inst)
-                                 (if (invariant? register argS)
-                                   (in function.identity)
-                                   (translate archive argS))))
+                              (is (Operation Inst)
+                                  (if (invariant? register argS)
+                                    (in function.identity)
+                                    (translate archive argS))))
                           pairs)
      .let [storesI+ (list@each (function (_ [register argS])
-                                 (: Inst
-                                    (if (invariant? register argS)
-                                      function.identity
-                                      (_.ASTORE register))))
+                                 (is Inst
+                                     (if (invariant? register argS)
+                                       function.identity
+                                       (_.ASTORE register))))
                                (list.reversed pairs))]]
     (in (|>> (_.fuse valuesI+)
              (_.fuse storesI+)
-- 
cgit v1.2.3