def current3

cswap-bend-cli@0.1.0.0 · store.bend:324

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/store/base.bend as SBase
import cswap-bend-cli@0.1.0.0/store/plan.bend as SPlan
import cswap-bend-cli@0.1.0.0/store/io.bend as SIo

324def current3(+root: String, +ctx: SBase.Ctx, +alias: String, +slot0: Maybe<&2, U32>, +assume_yes: Bool, fetch: String -> IO(SPlan.Prof)) -> Act.of(String):
325  do ActM<String>:
326    SIo.setup_dirs(root)
327    +ts : String <- SIo.now_iso()
328    seq : Json.Json <- SIo.ensure_seq(root, ts)
329    +cfg_text : String <- read_config_text(ctx)
330    current3b(root, ctx, alias, slot0, assume_yes, ts, seq, cfg_text, Json.parse(cfg_text), fetch)