def publish.put
import cswap-bend-cli@0.1.0.0/fs/write.bend as Writeimport 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))