aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/tool/compiler/phase.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/tool/compiler/phase.lux')
-rw-r--r--stdlib/source/library/lux/tool/compiler/phase.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/library/lux/tool/compiler/phase.lux b/stdlib/source/library/lux/tool/compiler/phase.lux
index 3f6caddbf..4809e8ed9 100644
--- a/stdlib/source/library/lux/tool/compiler/phase.lux
+++ b/stdlib/source/library/lux/tool/compiler/phase.lux
@@ -53,13 +53,13 @@
(All (_ s o)
(Operation s s))
(function (_ state)
- (#try.Success [state state])))
+ {#try.Success [state state]}))
(def: .public (set_state state)
(All (_ s o)
(-> s (Operation s Any)))
(function (_ _)
- (#try.Success [state []])))
+ {#try.Success [state []]}))
(def: .public (sub [get set] operation)
(All (_ s s' o)
@@ -94,7 +94,7 @@
(def: .public identity
(All (_ s a) (Phase s a a))
(function (_ archive input state)
- (#try.Success [state input])))
+ {#try.Success [state input]}))
(def: .public (composite pre post)
(All (_ s0 s1 i t o)