Yscal.map.cons: def of cswap-bend-cli@0.1.0.0
Import: import cswap-bend-cli@0.1.0.0/fmt/yscal.bend as Yscal
Lines 312-322 of cswap-bend-cli@0.1.0.0/fmt/yscal.bend: https://jend.leeeet.dev/read.txt?path=cswap-bend-cli@0.1.0.0/fmt/yscal.bend&start_line=312&end_line=322

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

# Merge one piece's field in front of the chain.
def map.cons(x: L.JR(), rest: L.JR()) -> L.JR():
  match x rest:
    case Done{Json.JField{k, v, n}} Done{b}:
      Done{Json.JField{k, v, b}}
    case Fail{e} _:
      Fail{e}
    case _ Fail{e}:
      Fail{e}
    case _ _:
      Fail{"bad flow mapping"}

Uses (3):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Result
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/fmt/ylex.bend&name=JR
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/json.bend&name=Json