From feacd79496ae9c76492d5a12d30b78724b642654 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 26 Jul 2022 18:08:04 -0400
Subject: Made inlined functions into first-class macros.

---
 lux-jvm/source/program.lux | 28 ++++++++++++++--------------
 1 file changed, 14 insertions(+), 14 deletions(-)

(limited to 'lux-jvm/source')

diff --git a/lux-jvm/source/program.lux b/lux-jvm/source/program.lux
index 17fe054ef..85b517bbd 100644
--- a/lux-jvm/source/program.lux
+++ b/lux-jvm/source/program.lux
@@ -169,19 +169,19 @@
     (let [context (context.jvm (cli.target service))]
       (exec (do async.monad
               [[loader host platform] (async.future ..platform)
-               _ (compositor.compiler
-                  ..lux_compiler
-                  context
-                  ..expander
-                  (analysis.bundle loader host)
-                  (io.io platform)
-                  generation.bundle
-                  (|>> ..extender (declaration.bundle loader))
-                  (/program.program /runtime.class_name) /reference.constant
-                  [Anchor (type_literal (Bytecode Any)) Definition]
-                  ..extender
-                  service
-                  [(packager.package context)
-                   (format (cli.target service) (at file.default separator) "program.jar")])]
+               _ (compositor.compiler ..lux_compiler
+                                      context
+                                      ..expander
+                                      (analysis.bundle loader host)
+                                      (io.io platform)
+                                      generation.bundle
+                                      (|>> ..extender (declaration.bundle loader))
+                                      (/program.program /runtime.class_name)
+                                      /reference.constant
+                                      [Anchor (type_literal (Bytecode Any)) Definition]
+                                      ..extender
+                                      service
+                                      [(packager.package context)
+                                       (format (cli.target service) (at file.default separator) "program.jar")])]
               (..declare_success! []))
         (io.io [])))))
-- 
cgit v1.2.3