(with-lock) ( lock timeout quot -- )

Vocabulary

concurrency.locks.private

Inputs

lock	an object
timeout	an object
quot	an object

Outputs

None

Definition

IN: concurrency.locks.private

: (with-lock) ( lock timeout quot -- )
    [ acquire-lock ] [ release-lock ] do-lock ; inline