aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/compositor.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/program/compositor.lux')
-rw-r--r--stdlib/source/program/compositor.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux
index 082ad0db9..69bae4f82 100644
--- a/stdlib/source/program/compositor.lux
+++ b/stdlib/source/program/compositor.lux
@@ -156,7 +156,7 @@
..timed
(do (try.with async.monad)
[.let [[compilation_host_dependencies compilation_libraries compilation_compilers compilation_sources compilation_target compilation_module compilation_configuration] compilation]
- import (import.import (value@ platform.#&file_system platform) compilation_libraries)
+ import (import.import (the platform.#&file_system platform) compilation_libraries)
[state archive phase_wrapper] (:sharing [<parameters>]
(Platform <parameters>)
platform
@@ -172,8 +172,8 @@
(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)
- host_dependencies (..load_host_dependencies (value@ platform.#&file_system platform) compilation_host_dependencies)
+ _ (cache.cache! (the platform.#&file_system platform) file_context archive)
+ host_dependencies (..load_host_dependencies (the platform.#&file_system platform) compilation_host_dependencies)
_ (..package! (for [@.old (file.async file.default)
@.jvm (file.async file.default)
... TODO: Handle this in a safer manner.
@@ -188,7 +188,7 @@
{cli.#Export export}
(<| (or_crash! "Export failed:")
(do (try.with async.monad)
- [_ (export.export (value@ platform.#&file_system platform)
+ [_ (export.export (the platform.#&file_system platform)
export)]
(in (debug.log! "Export complete!"))))