aboutsummaryrefslogtreecommitdiff
path: root/lux-lua/source/program.lux
diff options
context:
space:
mode:
authorEduardo Julian2022-03-11 05:52:21 -0400
committerEduardo Julian2022-03-11 05:52:21 -0400
commit6766be5427b1788a44e07151e3fabe33ec4f8b37 (patch)
tree8d8aa5c1d8fd4a9f733f82c48080284ecd4ec31a /lux-lua/source/program.lux
parentac2c19d93407b00c89513f0f81e9cbbd1425bd9a (diff)
Added an easy way to export Lux functionality to host programs (everywhere else).
Diffstat (limited to 'lux-lua/source/program.lux')
-rw-r--r--lux-lua/source/program.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/lux-lua/source/program.lux b/lux-lua/source/program.lux
index f1a759f2d..ae6f3af2f 100644
--- a/lux-lua/source/program.lux
+++ b/lux-lua/source/program.lux
@@ -866,11 +866,11 @@
(async.future (# world/program.default exit +0)))
(def: (lux_compiler it)
- (-> Any compiler.Custom)
+ (-> Any platform.Custom)
(undefined))
(`` (program: [service cli.service]
- (let [extension ".lua"]
+ (let [context (context.lua (cli.target service))]
(do io.monad
[(~~ (for [@.old [baggage platform]
@.jvm [baggage platform]
@@ -878,7 +878,7 @@
..platform]
(exec (do async.monad
[_ (/.compiler ..lux_compiler
- (context.lua (cli.target service))
+ context
(for [@.old (..expander ..to_host baggage)
@.jvm (..expander ..to_host baggage)
@.lua ..expander])
@@ -901,6 +901,6 @@
(format (cli.target service)
(# file.default separator)
"program"
- extension)])]
+ (value@ context.#artifact_extension context))])]
(..declare_success! []))
(io.io []))))))