diff options
Diffstat (limited to 'stdlib/source/lux/data/collection/row.lux')
-rw-r--r-- | stdlib/source/lux/data/collection/row.lux | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/stdlib/source/lux/data/collection/row.lux b/stdlib/source/lux/data/collection/row.lux index 668e49b6c..d388d6ede 100644 --- a/stdlib/source/lux/data/collection/row.lux +++ b/stdlib/source/lux/data/collection/row.lux @@ -377,8 +377,7 @@ (#Hierarchy hierarchy) (array/fold (function (_ node init') (fold f init' node)) init - hierarchy)) - )) + hierarchy)))) (structure: #export _ (Fold Row) (def: (fold f init xs) @@ -387,8 +386,7 @@ (fold f init (#Hierarchy (get@ #root xs))) - (#Base (get@ #tail xs)))) - )) + (#Base (get@ #tail xs)))))) (structure: #export Monoid<Row> (All [a] (Monoid (Row a))) (def: identity empty) @@ -402,16 +400,14 @@ (#Base (array/map f base)) (#Hierarchy hierarchy) - (#Hierarchy (array/map (map f) hierarchy))) - )) + (#Hierarchy (array/map (map f) hierarchy))))) (structure: #export _ (Functor Row) (def: (map f xs) {#level (get@ #level xs) #size (get@ #size xs) #root (|> xs (get@ #root) (array/map (:: Functor<Node> map f))) - #tail (|> xs (get@ #tail) (array/map f)) - })) + #tail (|> xs (get@ #tail) (array/map f))})) (structure: #export _ (Apply Row) (def: functor Functor<Row>) |