def publish.put

cswap-bend-cli@0.1.0.0 · fs/write.bend:59

import cswap-bend-cli@0.1.0.0/fs/write.bend as Write
import Base
import cswap-bend-cli@0.1.0.0/fs.bend as Fs

59def publish.put(r: Fs.Res(Unit), +tmp: String, +path: String, +data: String) -> IO(Fs.Res(Unit)):
60  match r:
61    case Fail{e}:
62      publish.fail(Fail{e}, tmp)
63    case Done{u}:
64      IO.bind(Fs.Res(Unit), Fs.Res(Unit), put(tmp, data), w => publish.mv(w, tmp, path))

Uses (9)

Used by (1)