diff options
author | Eduardo Julian | 2023-01-13 16:14:20 -0400 |
---|---|---|
committer | Eduardo Julian | 2023-01-13 16:14:20 -0400 |
commit | 913171900fd11272ca328ded6553a56423db1e13 (patch) | |
tree | e101c51aa5b4467eed4e7b956d2d941cd46f4b10 /lux-jvm | |
parent | 617069b3986e9271d6e73191b899aa914e430dd6 (diff) |
Can now compile complex values (i.e. variants & tuples) in C++.
Diffstat (limited to '')
-rw-r--r-- | lux-jvm/source/program.lux | 35 |
1 files changed, 18 insertions, 17 deletions
diff --git a/lux-jvm/source/program.lux b/lux-jvm/source/program.lux index a597ce394..f13547232 100644 --- a/lux-jvm/source/program.lux +++ b/lux-jvm/source/program.lux @@ -120,7 +120,7 @@ platform.#host host platform.#phase /.translate - platform.#runtime /runtime.translate + platform.#runtime /runtime.translation platform.#phase_wrapper ..phase_wrapper platform.#write product.right]]))) @@ -160,20 +160,21 @@ (def _ (program [service cli.service] (let [context (context.jvm (cli.target service))] - (exec (do async.monad - [[loader host platform] (async.future ..platform) - _ (compositor.compiler (|>> (as platform.Custom)) - context - ..expander - (analysis.bundle loader host) - (io.io platform) - translation.bundle - (declaration.bundle loader ..extender) - (/program.program /runtime.class_name) - /reference.constant - ..extender - service - [(packager.package context) - "program.jar"])] - (..declare_success! [])) + (exec + (do async.monad + [[loader host platform] (async.future ..platform) + _ (compositor.compiler (|>> (as platform.Custom)) + context + ..expander + (analysis.bundle loader host) + (io.io platform) + translation.bundle + (declaration.bundle loader ..extender) + (/program.program /runtime.class_name) + /reference.constant + ..extender + service + [(packager.package context) + "program.jar"])] + (..declare_success! [])) (io.io []))))) |