diff options
Diffstat (limited to 'stdlib/source/library/lux/data/collection/dictionary/ordered.lux')
-rw-r--r-- | stdlib/source/library/lux/data/collection/dictionary/ordered.lux | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/library/lux/data/collection/dictionary/ordered.lux b/stdlib/source/library/lux/data/collection/dictionary/ordered.lux index 3541cef42..9cbe20f49 100644 --- a/stdlib/source/library/lux/data/collection/dictionary/ordered.lux +++ b/stdlib/source/library/lux/data/collection/dictionary/ordered.lux @@ -70,11 +70,11 @@ {.#Some node} (let [node_key (the #key node)] - (cond (at dict = node_key key) + (cond (of dict = node_key key) ... (_#= node_key key) {.#Some (the #value node)} - (at dict < node_key key) + (of dict < node_key key) ... (_#< node_key key) (again (the #left node)) @@ -95,9 +95,9 @@ {.#Some node} (let [node_key (the #key node)] - (or (at dict = node_key key) + (or (of dict = node_key key) ... (_#= node_key key) - (if (at dict < node_key key) + (if (of dict < node_key key) ... (_#< node_key key) (again (the #left node)) (again (the #right node))))))))) @@ -358,7 +358,7 @@ {.#Some (right_balanced (the #key right) (the #value right) (the #right right>>left) - (at maybe.functor each reddened (the #right right)))}) + (of maybe.functor each reddened (the #right right)))}) _ (panic! error_message)) @@ -385,7 +385,7 @@ (the #value left>>right) {.#Some (left_balanced (the #key left) (the #value left) - (at maybe.functor each reddened (the #left left)) + (of maybe.functor each reddened (the #left left)) (the #left left>>right))} {.#Some (black key value (the #right left>>right) ?right)}) |