The module Lock contains procedures for locks.
Lock
IsLock
{Lock.is +X ?B}
{Lock.is
+X
?B
}
tests whether X is a lock.
X
NewLock
{Lock.new ?LockC}
{Lock.new
?LockC
creates and returns a new lock.