def plan.keep

bolt@1.27.0.0 · src/syntax/bind.bend:561

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

561# is a leaf of kind k the `=` or `<-` of a let, whose right side sees the
562# names outside the let?
563def plan.keep(mode: Mode, kk: Lex.TokKind) -> Bool:
564  match mode kk:
565    case MLhs{_outer, _kind} Lex.TEq{}:
566      True{}
567    case MLhs{_outer, _kind} Lex.TBind{}:
568      True{}
569    case MLhsType{_outer} Lex.TEq{}:
570      True{}
571    case MLhsType{_outer} Lex.TBind{}:
572      True{}
573    case _other _k:
574      False{}