diff options
Diffstat (limited to 'stdlib/source/program')
-rw-r--r-- | stdlib/source/program/compositor.lux | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux index 67bd9467b..0a29b79b7 100644 --- a/stdlib/source/program/compositor.lux +++ b/stdlib/source/program/compositor.lux @@ -35,7 +35,7 @@ ["[1]/[0]" program (.only Program)] ["[0]" syntax] ["[0]" generation] - ["[0]" directive] + ["[0]" declaration] ["[0]" analysis (.only) [macro (.only Expander)]] [phase @@ -133,9 +133,9 @@ (with_expansions [<parameters> (these anchor expression artifact)] (def .public (compiler lux_compiler file_context - expander host_analysis platform generation_bundle host_directive_bundle program anchorT,expressionT,directiveT extender - service - packager,package) + expander host_analysis platform generation_bundle host_declaration_bundle program anchorT,expressionT,declarationT extender + service + packager,package) (All (_ <parameters>) (-> (-> Any platform.Custom) Context @@ -143,7 +143,7 @@ analysis.Bundle (IO (Platform <parameters>)) (generation.Bundle <parameters>) - (-> phase.Wrapper (directive.Bundle <parameters>)) + (-> phase.Wrapper (declaration.Bundle <parameters>)) (Program expression artifact) [Type Type Type] (-> phase.Wrapper Extender) @@ -162,15 +162,15 @@ [state archive phase_wrapper] (sharing [<parameters>] (is (Platform <parameters>) platform) - (is (Async (Try [(directive.State+ <parameters>) + (is (Async (Try [(declaration.State+ <parameters>) Archive phase.Wrapper])) - (as_expected (platform.initialize file_context compilation_module expander host_analysis platform generation_bundle host_directive_bundle program anchorT,expressionT,directiveT extender + (as_expected (platform.initialize file_context compilation_module expander host_analysis platform generation_bundle host_declaration_bundle program anchorT,expressionT,declarationT extender import compilation_sources compilation_configuration)))) [archive state] (sharing [<parameters>] (is (Platform <parameters>) platform) - (is (Async (Try [Archive (directive.State+ <parameters>)])) + (is (Async (Try [Archive (declaration.State+ <parameters>)])) (as_expected (platform.compile lux_compiler phase_wrapper import file_context expander platform compilation [archive state])))) _ (cache.cache! (the platform.#file_system platform) file_context archive) host_dependencies (..load_host_dependencies (the platform.#file_system platform) compilation_host_dependencies) |