def search.lead

bolt@1.27.0.0 · src/rules/correctness/pick.bend:326

import Base
import bolt@1.27.0.0/src/finding.bend as F
import bolt@1.27.0.0/src/syntax/lex.bend as Lex
import bolt@1.27.0.0/src/syntax/tree.bend as Tree

326# a let's own tokens, a leading `+` skipped
327def search.lead(kids: Tree.Node, rest: Tree.Node, +name: String, +path: String) -> List<&2, F.Finding>:
328  match kids:
329    case Tree.NCons{Tree.Leaf{Lex.Tok{k, +t, l, c}}, +more}:
330      search.bound(Bool.pick(Tree.Node, String.eq(t, "+"), more, Tree.NCons{Tree.Leaf{Lex.Tok{k, t, l, c}}, more}),
331        rest, name, path)
332    case _other:
333      []