claim-lock
attempts to set the owner of the specified lock to be *current-process*
, at the same time setting its lock to t
, and incrementing its count.
If the lock is successfully claimed, claim-lock
returns t
, otherwise it returns nil
.