diff options
Diffstat (limited to '')
| -rw-r--r-- | lux-jvm/source/program.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lux-jvm/source/program.lux b/lux-jvm/source/program.lux index deef09f36..242d0553e 100644 --- a/lux-jvm/source/program.lux +++ b/lux-jvm/source/program.lux @@ -208,7 +208,7 @@ (write! "java.lang.Object" 2 $state)))))))) (def: (phase_wrapper archive) - (-> Archive (generation.Operation _.Anchor _.Inst _.Definition platform.Phase_Wrapper)) + (-> Archive (generation.Operation _.Anchor _.Inst _.Definition phase.Wrapper)) (do phase.monad [instanceG (function.function' (#.Some [0 (.nat -1)]) expression.translate archive [(list) 4 ..how_to_wrap_a_phase]) phase_wrapper (generation.evaluate! [0 (.nat -2)] instanceG)] @@ -244,7 +244,7 @@ #platform.write product.right}]))) (def: (extender phase_wrapper) - (-> platform.Phase_Wrapper Extender) + (-> phase.Wrapper Extender) ... TODO: Stop relying on coercions ASAP. (<| (:as Extender) (function (@self handler)) |