aboutsummaryrefslogtreecommitdiff
path: root/lux-python
diff options
context:
space:
mode:
Diffstat (limited to 'lux-python')
-rw-r--r--lux-python/source/program.lux14
1 files changed, 6 insertions, 8 deletions
diff --git a/lux-python/source/program.lux b/lux-python/source/program.lux
index f3dbc436c..e89d8b93c 100644
--- a/lux-python/source/program.lux
+++ b/lux-python/source/program.lux
@@ -492,8 +492,8 @@
[_ (execute! content)]
(evaluate! context (_.var (reference.artifact context)))))))))))))
-(with_expansions [<jvm> (these (def (extender phase_wrapper)
- (-> phase.Wrapper Extender)
+(with_expansions [<jvm> (these (def extender
+ Extender
... TODO: Stop relying on coercions ASAP.
(<| (as Extender)
(function (_ handler))
@@ -524,11 +524,9 @@
(-> phase.Wrapper Extender)
(as_expected handler))))
-(def (phase_wrapper archive)
- (-> Archive (runtime.Operation phase.Wrapper))
- (|> (..pseudo_function ..to_host)
- (as phase.Wrapper)
- phase#in))
+(def phase_wrapper
+ phase.Wrapper
+ (..pseudo_function ..to_host))
(def platform
(IO (Platform Register (_.Expression Any) (_.Statement Any)))
@@ -590,7 +588,7 @@
analysis.bundle
..platform
generation.bundle
- (function.constant extension/bundle.empty)
+ extension/bundle.empty
..lux_program
(reference.constant python/reference.system)
[Register