diff options
author | Eduardo Julian | 2022-03-02 04:37:11 -0400 |
---|---|---|
committer | Eduardo Julian | 2022-03-02 04:37:11 -0400 |
commit | d4792368d8e63f9eb883a2cfbe9da5312b2ad557 (patch) | |
tree | 68172b6618d014307607a4866d48419957cfc340 /stdlib/source/program | |
parent | 8023df0f5dae4638021fef7b8194a3d0a16b32e4 (diff) |
Finishing the meta-compiler [Part 5]
Diffstat (limited to 'stdlib/source/program')
-rw-r--r-- | stdlib/source/program/compositor.lux | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux index cad7bf352..70e392965 100644 --- a/stdlib/source/program/compositor.lux +++ b/stdlib/source/program/compositor.lux @@ -46,6 +46,8 @@ ["[0]" cli {"+" Service}] ["[0]" import] ["[0]" export] + ["[0]" cache "_" + ["[1]" archive]] [archive {"+" Archive} ["[0]" unit] [module @@ -170,7 +172,7 @@ (Async (Try [Archive (directive.State+ <parameters>)])) (:expected (platform.compile lux_compiler phase_wrapper import file_context expander platform compilation [archive state]))) - _ (ioW.freeze (value@ platform.#&file_system platform) file_context archive) + _ (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) |