def tree_word

mylsm-lsm-store@0.6.0.1 · src/BitTree.bend:107

import Base

107# Handle tree word in the packed bit-tree operations.
108def tree_word(path: List<&2, Bool>, tree: WordTree) -> U32:
109  match path tree:
110    case Nil{} Empty{}:
111      0
112    case Nil{} Leaf{word}:
113      word
114    case Nil{} Fork{left, right}:
115      0
116    case Con{side, rest} Empty{}:
117      0
118    case Con{side, rest} Leaf{word}:
119      0
120    case Con{False{}, rest} Fork{left, right}:
121      tree_word(rest, left)
122    case Con{True{}, rest} Fork{left, right}:
123      tree_word(rest, right)