aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/macro/syntax/common/reader.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux/macro/syntax/common/reader.lux5
1 files changed, 3 insertions, 2 deletions
diff --git a/stdlib/source/lux/macro/syntax/common/reader.lux b/stdlib/source/lux/macro/syntax/common/reader.lux
index 84d40fb03..33ca61b8b 100644
--- a/stdlib/source/lux/macro/syntax/common/reader.lux
+++ b/stdlib/source/lux/macro/syntax/common/reader.lux
@@ -4,7 +4,8 @@
["p" parser])
(data (coll [list "L/" Functor<List>])
[ident "Ident/" Eq<Ident>]
- [product])
+ [product]
+ [maybe])
[macro]
(macro ["s" syntax #+ syntax: Syntax]))
[.. #*])
@@ -87,7 +88,7 @@
(def: (find-definition-args meta-data)
(-> (List [Ident Code]) (List Text))
- (default (list)
+ (maybe;default (list)
(case (list;find (|>. product;left (Ident/= ["lux" "func-args"])) meta-data)
(^multi (#;Some [_ value])
[(p;run (list value) list-meta^)