From 3f23fb8c846acfd7cf04481f12839469c63a1148 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 18 Mar 2021 16:27:04 -0400
Subject: Updates for Scheme compiler.

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

(limited to 'lux-php/source')

diff --git a/lux-php/source/program.lux b/lux-php/source/program.lux
index a13039760..716405587 100644
--- a/lux-php/source/program.lux
+++ b/lux-php/source/program.lux
@@ -483,7 +483,7 @@
               (let [global (reference.artifact context)
                     @global (_.global global)]
                 (do try.monad
-                  [#let [definition (_.; (_.set @global input))]
+                  [#let [definition (_.set! @global input)]
                    _ (run! definition)
                    value (run! (_.return @global))]
                   (wrap [global value definition]))))
-- 
cgit v1.2.3