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-cl/source/program.lux | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'lux-cl')

diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux
index 83d5af3d9..2d56463d8 100644
--- a/lux-cl/source/program.lux
+++ b/lux-cl/source/program.lux
@@ -328,7 +328,7 @@
                    (wrap [global value definition]))))
 
              (def: (ingest context content)
-               (|> content (# encoding.utf8 decoded) try.trusted (as (_.Expression Any))))
+               (|> content (at encoding.utf8 decoded) try.trusted (as (_.Expression Any))))
 
              (def: (re_learn context content)
                (run! content))
@@ -347,7 +347,7 @@
            platform.#host host
            platform.#phase common_lisp.generate
            platform.#runtime runtime.generate
-           platform.#write (|>> _.code (# encoding.utf8 encoded))])))
+           platform.#write (|>> _.code (at encoding.utf8 encoded))])))
 
 (def: get_ecl_cli_inputs
   (let [@idx (_.var "i")]
@@ -396,7 +396,7 @@
 
 (def: (declare_success! _)
   (-> Any (Promise Any))
-  (promise.future (# world/program.default exit +0)))
+  (promise.future (at world/program.default exit +0)))
 
 (def: (then pre post)
   (-> (_.Expression Any) (_.Expression Any) (_.Expression Any))
@@ -435,7 +435,7 @@
                                                     ..then
                                                     ..scope)
                                   (format (/cli.target service)
-                                          (# file.default separator)
+                                          (at file.default separator)
                                           "program"
                                           extension)])]
                   (..declare_success! []))
-- 
cgit v1.2.3