<reentrant-lock> ( -- lock )
Locks ยป Mutual-exclusion locks
Prev:<lock> ( -- lock )
Next:with-lock ( lock quot -- )


Vocabulary
concurrency.locks

Inputs
None

Outputs
locka lock


Word description
Creates a reentrant lock.

Definition
USING: dlists kernel ;

IN: concurrency.locks

: <reentrant-lock> ( -- lock ) <dlist> f t lock boa ;