def is_live.sign

bolt@1.27.0.0 · src/rules/calls.bend:202

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

202# does the chain open with a `-` or `~` operator?
203def is_live.sign(pp: Tree.Node) -> Bool:
204  match pp:
205    case Tree.NCons{+h, rest}:
206      +t = leaf.text(h)
207      Bool.and(kind.leaf(~kind.oper, h), Bool.or(String.eq(t, "-"), String.eq(t, "~")))
208    case other:
209      False{}