diff options
| author | Eduardo Julian | 2022-03-09 03:35:16 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2022-03-09 03:35:16 -0400 |
| commit | ac2c19d93407b00c89513f0f81e9cbbd1425bd9a (patch) | |
| tree | 1d46f3ed935ed84ab557c58f723ff0e3d24d6806 /stdlib/source/program | |
| parent | bf0562d72b7d42be2b378a7f312fe48ac1f4284c (diff) | |
Added an easy way to export Lux functionality to host programs (in JVM).
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/program/compositor.lux | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux index c835643dd..082ad0db9 100644 --- a/stdlib/source/program/compositor.lux +++ b/stdlib/source/program/compositor.lux @@ -94,7 +94,7 @@ (in output))) (def: (package! fs host_dependencies [packager package] archive context) - (-> (file.System Async) (Dictionary file.Path Binary) [Packager file.Path] Archive unit.ID (Async (Try Any))) + (-> (file.System Async) (Dictionary file.Path Binary) [Packager file.Path] Archive (Maybe unit.ID) (Async (Try Any))) (case (packager host_dependencies archive context) {try.#Success content} (case content @@ -173,7 +173,6 @@ (Async (Try [Archive (directive.State+ <parameters>)])) (:expected (platform.compile lux_compiler phase_wrapper import file_context expander platform compilation [archive state]))) _ (cache.cache! (value@ platform.#&file_system platform) file_context archive) - program_context (async#in ($/program.context archive)) host_dependencies (..load_host_dependencies (value@ platform.#&file_system platform) compilation_host_dependencies) _ (..package! (for [@.old (file.async file.default) @.jvm (file.async file.default) @@ -183,7 +182,7 @@ host_dependencies packager,package archive - program_context)] + (try.maybe ($/program.context archive)))] (in (debug.log! "Compilation complete!")))) {cli.#Export export} |