diff options
author | Eduardo Julian | 2018-07-21 02:57:44 -0400 |
---|---|---|
committer | Eduardo Julian | 2018-07-21 02:57:44 -0400 |
commit | 35b77d1ae1e0e4d59f8341089b12c0043abaddd8 (patch) | |
tree | 65d68583f1d694a8c80d2742c77aab68092bb947 /stdlib/source/lux/concurrency/actor.lux | |
parent | 660c7fe6af927c6e668a86e44fd2f0a9b1fb8b8b (diff) |
Re-named "Ident" to "Name".
Diffstat (limited to 'stdlib/source/lux/concurrency/actor.lux')
-rw-r--r-- | stdlib/source/lux/concurrency/actor.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/lux/concurrency/actor.lux b/stdlib/source/lux/concurrency/actor.lux index 52bf7621d..b9b1a22c2 100644 --- a/stdlib/source/lux/concurrency/actor.lux +++ b/stdlib/source/lux/concurrency/actor.lux @@ -150,15 +150,15 @@ ## [Syntax] (do-template [<with> <resolve> <tag> <desc>] [(def: #export (<with> name) - (-> Ident cs.Annotations cs.Annotations) - (|>> (#.Cons [(ident-for <tag>) + (-> Name cs.Annotations cs.Annotations) + (|>> (#.Cons [(name-for <tag>) (code.tag name)]))) (def: #export (<resolve> name) - (-> Ident (Meta Ident)) + (-> Name (Meta Name)) (do Monad<Meta> [[_ annotations _] (macro.find-def name)] - (case (macro.get-tag-ann (ident-for <tag>) annotations) + (case (macro.get-tag-ann (name-for <tag>) annotations) (#.Some actor-name) (wrap actor-name) @@ -293,7 +293,7 @@ s.any))) (def: reference^ - (s.Syntax [Ident (List Text)]) + (s.Syntax [Name (List Text)]) (p.either (s.form (p.seq s.symbol (p.some s.local-symbol))) (p.seq s.symbol (:: p.Monad<Parser> wrap (list))))) @@ -373,7 +373,7 @@ (~ g!self))] (if (~ g!sent?) ((~' wrap) (~ g!task)) - ((~' wrap) (task.throw ..dead [(~ (code.text (%ident actor-name))) - (~ (code.text (%ident message-name)))])))))))) + ((~' wrap) (task.throw ..dead [(~ (code.text (%name actor-name))) + (~ (code.text (%name message-name)))])))))))) )) ))) |