diff options
| author | Eduardo Julian | 2017-01-25 20:30:44 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2017-01-25 20:30:44 -0400 |
| commit | 216a12cd02337c83c889a667063e0c06f2944e65 (patch) | |
| tree | 5394a1bbf8df4d28de5625fd1803bf2ccbbe1a04 /stdlib/source/lux/concurrency/actor.lux | |
| parent | 0a9547eed8546519e883bc40a38104842de2988c (diff) | |
- Moved the lux/data/struct/* modules to lux/data/coll/*.
- Did the same for the lux/codata/struct/* modules.
- Moved lux/codata/io to lux/io.
- Moved lux/control/effect to lux/effect.
- Renamed "sample" functions to "this" functions.
- Renamed "at" functions to "nth" functions.
Diffstat (limited to 'stdlib/source/lux/concurrency/actor.lux')
| -rw-r--r-- | stdlib/source/lux/concurrency/actor.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/lux/concurrency/actor.lux b/stdlib/source/lux/concurrency/actor.lux index e55386d9d..73529e987 100644 --- a/stdlib/source/lux/concurrency/actor.lux +++ b/stdlib/source/lux/concurrency/actor.lux @@ -6,11 +6,11 @@ (;module: {#;doc "The actor model of concurrency."} lux (lux (control monad) - (codata [io #- run] - function) + [io #- run] + (codata function) (data [error #- fail] text/format - (struct [list "List/" Monoid<List> Monad<List>]) + (coll [list "List/" Monoid<List> Monad<List>]) [product] [number "Nat/" Codec<Text,Nat>]) [compiler #+ with-gensyms] @@ -154,7 +154,7 @@ (def: method^ (Syntax Method) (s;form (do s;Monad<Syntax> - [_ (s;sample! (' method:)) + [_ (s;this! (' method:)) vars (s;default (list) (s;tuple (s;some s;local-symbol))) [name args] (s;form ($_ s;seq s;local-symbol @@ -171,7 +171,7 @@ (def: stop^ (Syntax AST) (s;form (do s;Monad<Syntax> - [_ (s;sample! (' stop:))] + [_ (s;this! (' stop:))] s;any))) (def: actor-decl^ |