diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/lux/macro/syntax/common/reader.lux | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/lux/macro/syntax/common/reader.lux b/stdlib/source/lux/macro/syntax/common/reader.lux index 63b185bd8..a1b9ceb70 100644 --- a/stdlib/source/lux/macro/syntax/common/reader.lux +++ b/stdlib/source/lux/macro/syntax/common/reader.lux @@ -1,9 +1,9 @@ (.module: {#.doc "Commons syntax readers."} lux (lux (control monad - ["p" parser "p/" Monad<Parser>]) + ["p" parser ("parser/" Monad<Parser>)]) (data (collection [list]) - [ident "ident/" Equivalence<Ident>] + [ident ("ident/" Equivalence<Ident>)] [product] [maybe]) [macro] @@ -13,8 +13,8 @@ ## Exports (def: #export export (Syntax Bool) - (p.either (p.after (s.this (' #export)) (p/wrap true)) - (p/wrap false))) + (p.either (p.after (s.this (' #export)) (parser/wrap true)) + (parser/wrap false))) ## Declarations (def: #export declaration @@ -24,7 +24,7 @@ (foo bar baz))} (Syntax //.Declaration) (p.either (p.seq s.local-symbol - (p/wrap (list))) + (parser/wrap (list))) (s.form (p.seq s.local-symbol (p.many s.local-symbol))))) @@ -42,7 +42,7 @@ type s.any value s.any] (wrap [(#.Some type) value]))) - (p.seq (p/wrap #.None) + (p.seq (parser/wrap #.None) s.any))) (def: _definition-anns-tag^ |