aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/experiment/tool
diff options
context:
space:
mode:
authorEduardo Julian2022-07-28 02:44:45 -0400
committerEduardo Julian2022-07-28 02:44:45 -0400
commita4847190df926d35f7ece97da50a2a8b1462a24f (patch)
treed368c52b41425631c3962d3c238e6c3c9c797ad6 /stdlib/source/experiment/tool
parentebfe1bbbe543299f8691e4862fbc899637ff8cfd (diff)
Now statically resolving values from globals in pattern-matching.
Diffstat (limited to '')
-rw-r--r--stdlib/source/experiment/tool/interpreter.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/experiment/tool/interpreter.lux b/stdlib/source/experiment/tool/interpreter.lux
index c6e9c5de3..ad8092a5b 100644
--- a/stdlib/source/experiment/tool/interpreter.lux
+++ b/stdlib/source/experiment/tool/interpreter.lux
@@ -204,7 +204,7 @@
(loop (again [context [#configuration configuration
#state state
#source ..fresh_source]
- multi_line? #0])
+ multi_line? false])
(do !
[_ (if multi_line?
(at Console<!> write " ")
@@ -217,11 +217,11 @@
{try.#Success [context' representation]}
(do !
[_ (at Console<!> write representation)]
- (again context' #0))
+ (again context' false))
{try.#Failure error}
(if (ex.match? syntax.end_of_file error)
- (again context #1)
+ (again context true)
(exec (log! (ex.error ..error error))
- (again (has #source ..fresh_source context) #0))))))
+ (again (has #source ..fresh_source context) false))))))
)))