diff options
Diffstat (limited to 'stdlib/source/lux/macro/syntax/common/reader.lux')
| -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 93e2ffa09..ee846218e 100644 --- a/stdlib/source/lux/macro/syntax/common/reader.lux +++ b/stdlib/source/lux/macro/syntax/common/reader.lux @@ -2,9 +2,9 @@ [lux #* [control monad - ["p" parser ("parser/." monad)]] + ["p" parser ("#/." monad)]] [data - [name ("name/." equivalence)] + ["." name ("#/." equivalence)] ["." product] ["." maybe] [collection @@ -16,8 +16,8 @@ ## Exports (def: #export export (Syntax Bit) - (p.either (p.after (s.this (' #export)) (parser/wrap #1)) - (parser/wrap #0))) + (p.either (p.after (s.this (' #export)) (p/wrap #1)) + (p/wrap #0))) ## Declarations (def: #export declaration @@ -27,7 +27,7 @@ (foo bar baz))} (Syntax //.Declaration) (p.either (p.and s.local-identifier - (parser/wrap (list))) + (p/wrap (list))) (s.form (p.and s.local-identifier (p.some s.local-identifier))))) @@ -45,7 +45,7 @@ type s.any value s.any] (wrap [(#.Some type) value]))) - (p.and (parser/wrap #.None) + (p.and (p/wrap #.None) s.any))) (def: _definition-anns-tag^ |