BitTree.tree_word: def of mylsm-lsm-store@0.6.0.1
Import: import mylsm-lsm-store@0.6.0.1/src/BitTree.bend as BitTree
Lines 107-123 of mylsm-lsm-store@0.6.0.1/src/BitTree.bend: https://jend.leeeet.dev/read.txt?path=mylsm-lsm-store@0.6.0.1/src/BitTree.bend&start_line=107&end_line=123

import Base

# Handle tree word in the packed bit-tree operations.
def tree_word(path: List<&2, Bool>, tree: WordTree) -> U32:
  match path tree:
    case Nil{} Empty{}:
      0
    case Nil{} Leaf{word}:
      word
    case Nil{} Fork{left, right}:
      0
    case Con{side, rest} Empty{}:
      0
    case Con{side, rest} Leaf{word}:
      0
    case Con{False{}, rest} Fork{left, right}:
      tree_word(rest, left)
    case Con{True{}, rest} Fork{left, right}:
      tree_word(rest, right)

Uses (4):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=mylsm-lsm-store@0.6.0.1/src/BitTree.bend&name=WordTree