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