diff options
author | Eduardo Julian | 2020-11-01 22:56:30 -0400 |
---|---|---|
committer | Eduardo Julian | 2020-11-01 22:56:30 -0400 |
commit | 3e67e244ad1f58a7bab0094967a86be72aae2482 (patch) | |
tree | 5e8677dd7401134cac932c423a766bcff69c41e2 /stdlib/source/lux/data/collection/tree.lux | |
parent | 69272f598d831e89da83bdc8c9290d5607dfb14d (diff) |
Improved the design of actors.
Diffstat (limited to 'stdlib/source/lux/data/collection/tree.lux')
-rw-r--r-- | stdlib/source/lux/data/collection/tree.lux | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/stdlib/source/lux/data/collection/tree.lux b/stdlib/source/lux/data/collection/tree.lux index aab50c4f3..375732b1b 100644 --- a/stdlib/source/lux/data/collection/tree.lux +++ b/stdlib/source/lux/data/collection/tree.lux @@ -2,9 +2,9 @@ [lux #* [abstract [functor (#+ Functor)] - [monad (#+ Monad do)] [equivalence (#+ Equivalence)] - [fold (#+ Fold)]] + [fold (#+ Fold)] + [monad (#+ do)]] [control ["<>" parser ["<c>" code (#+ Parser)]]] @@ -39,10 +39,13 @@ (def: tree^ (Parser Tree-Code) - (|> (|>> <>.some <c>.record (<>.and <c>.any)) + (|> (|>> <>.some + <c>.record + (<>.and <c>.any)) <>.rec <>.some <c>.record + (<>.default (list)) (<>.and <c>.any))) (syntax: #export (tree {root tree^}) |