aboutsummaryrefslogtreecommitdiff
path: root/lux-cl/source/program.lux
diff options
context:
space:
mode:
Diffstat (limited to 'lux-cl/source/program.lux')
-rw-r--r--lux-cl/source/program.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux
index 4377dcc45..d2ecadfbf 100644
--- a/lux-cl/source/program.lux
+++ b/lux-cl/source/program.lux
@@ -329,7 +329,7 @@
(wrap [global value definition]))))
(def (ingest context content)
- (|> content (at encoding.utf8 decoded) try.trusted (as (_.Expression Any))))
+ (|> content (of encoding.utf8 decoded) try.trusted (as (_.Expression Any))))
(def (re_learn context content)
(run! content))
@@ -348,7 +348,7 @@
platform.#host host
platform.#phase common_lisp.translate
platform.#runtime runtime.translate
- platform.#write (|>> _.code (at encoding.utf8 encoded))])))
+ platform.#write (|>> _.code (of encoding.utf8 encoded))])))
(def get_ecl_cli_inputs
(let [@idx (_.var "i")]
@@ -395,7 +395,7 @@
(def (declare_success! _)
(-> Any (Promise Any))
- (promise.future (at world/program.default exit +0)))
+ (promise.future (of 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)
- (at file.default separator)
+ (of file.default separator)
"program"
extension)])]
(..declare_success! []))