aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/tool/interpreter.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/tool/interpreter.lux')
-rw-r--r--stdlib/source/library/lux/tool/interpreter.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/library/lux/tool/interpreter.lux b/stdlib/source/library/lux/tool/interpreter.lux
index abd53a54b..8cf01011c 100644
--- a/stdlib/source/library/lux/tool/interpreter.lux
+++ b/stdlib/source/library/lux/tool/interpreter.lux
@@ -101,7 +101,7 @@
(All (_ anchor expression directive)
(-> Code <Interpretation>))
(do [! phase.monad]
- [state (extension.lifted phase.get_state)
+ [state (extension.lifted phase.state)
.let [analyse (value@ [directive.#analysis directive.#phase] state)
synthesize (value@ [directive.#synthesis directive.#phase] state)
generate (value@ [directive.#generation directive.#phase] state)]
@@ -155,7 +155,7 @@
(-> Configuration Code (Operation anchor expression directive Text)))
(do phase.monad
[[codeT codeV] (interpret configuration code)
- state phase.get_state]
+ state phase.state]
(in (/type.represent (value@ [extension.#state
directive.#analysis directive.#state
extension.#state]