aboutsummaryrefslogtreecommitdiff
path: root/stdlib
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib')
-rw-r--r--stdlib/source/lux/tool/compiler/default/init.lux5
-rw-r--r--stdlib/source/lux/tool/compiler/phase/generation.lux2
2 files changed, 5 insertions, 2 deletions
diff --git a/stdlib/source/lux/tool/compiler/default/init.lux b/stdlib/source/lux/tool/compiler/default/init.lux
index fc9a805f7..40549f8d0 100644
--- a/stdlib/source/lux/tool/compiler/default/init.lux
+++ b/stdlib/source/lux/tool/compiler/default/init.lux
@@ -237,7 +237,10 @@
///directive.lift-analysis
extension.lift
macro.current-module)
- _ (monad.map @ execute! (get@ #///directive.referrals requirements))]
+ _ (///directive.lift-generation
+ (generation.set-buffer buffer))
+ _ (monad.map @ execute! (get@ #///directive.referrals requirements))
+ buffer (..get-current-buffer buffer)]
(..iterate expander module source buffer (..module-aliases analysis-module))))))})])
)))))}))))
diff --git a/stdlib/source/lux/tool/compiler/phase/generation.lux b/stdlib/source/lux/tool/compiler/phase/generation.lux
index cbd0bba9b..198ca4bb4 100644
--- a/stdlib/source/lux/tool/compiler/phase/generation.lux
+++ b/stdlib/source/lux/tool/compiler/phase/generation.lux
@@ -233,7 +233,7 @@
(case ?buffer
(#.Some buffer)
(if (row.any? (|>> product.left (name@= name)) buffer)
- (//.throw cannot-overwrite-output name)
+ (//.throw ..cannot-overwrite-output name)
(extension.update (set@ #buffer (#.Some (row.add [name code] buffer)))))
#.None