def binds

bolt@1.27.0.0 · src/rules/style/transcong.bend:133

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

133# is the node a `=` or `<-` leaf, a let's?
134def binds(nn: Tree.Node) -> Bool:
135  match nn:
136    case Tree.Leaf{Lex.Tok{Lex.TEq{}, _t, _l, _c}}:
137      True{}
138    case Tree.Leaf{Lex.Tok{Lex.TBind{}, _t, _l, _c}}:
139      True{}
140    case _other:
141      False{}