Rewalk.apply: def of bolt@1.27.0.0
Import: import bolt@1.27.0.0/src/rules/pedantic/rewalk.bend as Rewalk
Lines 706-718 of bolt@1.27.0.0/src/rules/pedantic/rewalk.bend: https://jend.leeeet.dev/read.txt?path=bolt@1.27.0.0/src/rules/pedantic/rewalk.bend&start_line=706&end_line=718

import Base
import bolt@1.27.0.0/src/syntax/tree.bend as Tree

# lets of a call retag that call
def apply(nn: Tree.Node, sites: List<&2, Site>) -> List<&2, Site>:
  match nn:
    case Tree.NCons{Tree.Stmt{Tree.SCase{}, kids, body}, rest}:
      apply(rest, sites)
    case Tree.NCons{Tree.Stmt{kind, +kids, body}, rest}:
      apply(rest, apply(body, retag_may(note_st(kids), sites)))
    case Tree.NCons{Tree.Group{open, +kids, close}, rest}:
      apply(rest, apply(kids, sites))
    case Tree.NCons{h, rest}:
      apply(rest, sites)
    case other:
      sites

Uses (6):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=bolt@1.27.0.0/src/rules/pedantic/rewalk.bend&name=Site
  https://jend.leeeet.dev/definition.txt?path=bolt@1.27.0.0/src/rules/pedantic/rewalk.bend&name=note_st
  https://jend.leeeet.dev/definition.txt?path=bolt@1.27.0.0/src/rules/pedantic/rewalk.bend&name=retag_may
  https://jend.leeeet.dev/definition.txt?path=bolt@1.27.0.0/src/syntax/tree.bend&name=Node
  https://jend.leeeet.dev/definition.txt?path=bolt@1.27.0.0/src/syntax/tree.bend&name=StmtKind