Returns the name of a lock.
mp
lock-name lock => name
lock
A lock object
name
A string
The lock-name function takes a lock object as its argument and returns the name of the lock object.
lock-name
(let ((lock (mp:make-lock :name "my lock")))
(mp:lock-name lock))
=> "my lock"
make-lock with-lock process-lock process-unlock lock-owner
