def take_once

cswap-bend-cli@0.1.0.0 · dirlock.bend:38

import Base
import cswap-bend-cli@0.1.0.0/fs.bend as Fs
import cswap-bend-cli@0.1.0.0/act.bend as Act

38# One attempt: mkdir without -p, so it fails while the lock is held.
39def take_once(+dir: String) -> Act.of(Bool):
40  IO.bind(Fs.Res(String), Fs.Res(Bool), Fs.tool("/bin/mkdir", [dir]), r => IO.pure(Fs.Res(Bool), mkdir_ok(r)))