def parse_input

cswap-bend-cli@0.1.0.0 · cfgio.bend:249

import Base
import cswap-bend-cli@0.1.0.0/json.bend as Json
import cswap-bend-cli@0.1.0.0/act.bend as Act
import cswap-bend-cli@0.1.0.0/setimp.bend as Imp

249def parse_input(+path: String, fmt: Maybe<&2, String>, data: Maybe<&2, String>, noin: Bool) -> Act.of(Parsed):
250  do ActM<Parsed>:
251    +text : String <- read_src(data, path, noin)
252    +f : String <- lift_str(Imp.pick_format(fmt, path))
253    +doc : Json.Json <- lift_json(Imp.parse_doc(f, text))
254    Act.pure(Parsed, Parsed{f, doc})