From f9e33ae96aec4741385a576719786092c9e68043 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 4 Jun 2022 19:34:42 -0400
Subject: De-sigil-ification: #

---
 lux-scheme/source/program.lux | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'lux-scheme')

diff --git a/lux-scheme/source/program.lux b/lux-scheme/source/program.lux
index b35fd049f..b91b74727 100644
--- a/lux-scheme/source/program.lux
+++ b/lux-scheme/source/program.lux
@@ -390,7 +390,7 @@
                    (wrap [global value definition]))))
 
              (def: (ingest context content)
-               (|> content (# encoding.utf8 decoded) try.trusted (as _.Expression)))
+               (|> content (at encoding.utf8 decoded) try.trusted (as _.Expression)))
 
              (def: (re_learn context content)
                (run! content))
@@ -409,7 +409,7 @@
            platform.#host host
            platform.#phase scheme.generate
            platform.#runtime runtime.generate
-           platform.#write (|>> _.code (# encoding.utf8 encoded))])))
+           platform.#write (|>> _.code (at encoding.utf8 encoded))])))
 
 (def: (program context program)
   (Program _.Expression _.Expression)
@@ -452,7 +452,7 @@
 
 (def: (declare_success! _)
   (-> Any (Promise Any))
-  (promise.future (# world/program.default exit +0)))
+  (promise.future (at world/program.default exit +0)))
 
 (`` (program: [service /cli.service]
       (let [extension ".scm"]
@@ -475,7 +475,7 @@
                                  service
                                  [(packager.package now)
                                   (format (/cli.target service)
-                                          (# file.default separator)
+                                          (at file.default separator)
                                           "program.tar")])]
                   (..declare_success! []))
             (io.io []))))))
-- 
cgit v1.2.3