From a2730ad74042cbc91602b47b2c6e6a7309bdfda0 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 21 Oct 2022 01:01:35 -0400
Subject: Clean-up after format change for extensions [part 0]

---
 stdlib/source/program/compositor.lux | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

(limited to 'stdlib/source/program')

diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux
index fced2ef5e..5fb5696b1 100644
--- a/stdlib/source/program/compositor.lux
+++ b/stdlib/source/program/compositor.lux
@@ -33,7 +33,8 @@
        ["[0]" analysis (.only)
         [macro (.only Expander)]]
        [phase
-        [extension (.only Extender)]]]]
+        [extension (.only Extender)
+         ["[0]E" analysis]]]]]
      [meta
       [packager (.only Packager)]
       [context (.only Context)]
@@ -166,10 +167,7 @@
                                                    (as_expected (platform.initialize file_context
                                                                                      (the cli.#module compilation)
                                                                                      expander
-                                                                                     host_analysis
                                                                                      platform
-                                                                                     generation_bundle
-                                                                                     host_declaration_bundle
                                                                                      program
                                                                                      extender
                                                                                      import
@@ -189,7 +187,10 @@
                                                                     expander
                                                                     platform
                                                                     compilation
-                                                                    [archive state]))))
+                                                                    [archive state]
+                                                                    [(analysisE.bundle host_analysis)
+                                                                     generation_bundle
+                                                                     host_declaration_bundle]))))
                _ (cache.cache! (the platform.#file_system platform) (the cli.#configuration compilation) file_context archive)
                host_dependencies (..load_host_dependencies (the platform.#file_system platform)
                                                            (the cli.#host_dependencies compilation))
-- 
cgit v1.2.3