diff options
Diffstat (limited to 'stdlib/source/lux/macro/syntax/common/reader.lux')
| -rw-r--r-- | stdlib/source/lux/macro/syntax/common/reader.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/lux/macro/syntax/common/reader.lux b/stdlib/source/lux/macro/syntax/common/reader.lux index 818320a1a..2ec2ee95d 100644 --- a/stdlib/source/lux/macro/syntax/common/reader.lux +++ b/stdlib/source/lux/macro/syntax/common/reader.lux @@ -4,7 +4,7 @@ monad ["p" parser ("parser/." Monad<Parser>)]] [data - [ident ("ident/." Equivalence<Ident>)] + [name ("name/." Equivalence<Name>)] ["." product] ["." maybe] [collection @@ -49,7 +49,7 @@ s.any))) (def: _definition-anns-tag^ - (Syntax Ident) + (Syntax Name) (s.tuple (p.seq s.text s.text))) (def: (_definition-anns^ _) @@ -88,9 +88,9 @@ ) (def: (find-definition-args meta-data) - (-> (List [Ident Code]) (List Text)) + (-> (List [Name Code]) (List Text)) (<| (maybe.default (list)) - (case (list.find (|>> product.left (ident/= ["lux" "func-args"])) meta-data) + (case (list.find (|>> product.left (name/= ["lux" "func-args"])) meta-data) (^multi (#.Some [_ value]) [(p.run (list value) tuple-meta^) (#.Right [_ args])] |