def item.cons

cswap-bend-cli@0.1.0.0 · fmt/yscal.bend:186

import Base
import cswap-bend-cli@0.1.0.0/json.bend as Json
import cswap-bend-cli@0.1.0.0/fmt/ylex.bend as L

186def item.cons(x: L.JR(), rest: L.JR()) -> L.JR():
187  match x rest:
188    case Done{a} Done{b}:
189      Done{Json.JCons{a, b}}
190    case Fail{e} _:
191      Fail{e}
192    case _ Fail{e}:
193      Fail{e}