aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/control/monad/indexed.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/control/monad/indexed.lux')
-rw-r--r--stdlib/source/lux/control/monad/indexed.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/lux/control/monad/indexed.lux b/stdlib/source/lux/control/monad/indexed.lux
index af83464d4..ef2acb904 100644
--- a/stdlib/source/lux/control/monad/indexed.lux
+++ b/stdlib/source/lux/control/monad/indexed.lux
@@ -24,7 +24,7 @@
(def: binding
(Syntax Binding)
- (p.seq s.any s.any))
+ (p.and s.any s.any))
(type: Context
(#Let (List Binding))
@@ -32,9 +32,9 @@
(def: context
(Syntax Context)
- (p.alt (p.after (s.this (' #let))
- (s.tuple (p.some binding)))
- binding))
+ (p.or (p.after (s.this (' #let))
+ (s.tuple (p.some binding)))
+ binding))
(def: (pair-list [binding value])
(All [a] (-> [a a] (List a)))