aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/data/collection/tree.lux
diff options
context:
space:
mode:
authorEduardo Julian2020-11-01 22:56:30 -0400
committerEduardo Julian2020-11-01 22:56:30 -0400
commit3e67e244ad1f58a7bab0094967a86be72aae2482 (patch)
tree5e8677dd7401134cac932c423a766bcff69c41e2 /stdlib/source/lux/data/collection/tree.lux
parent69272f598d831e89da83bdc8c9290d5607dfb14d (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.lux9
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^})