branch: externals/sly
commit a1fc34c76e97b8d7622148fd1285025278d077f9
Author: Chris Schafmeister <[email protected]>
Commit: João Távora <[email protected]>
Add a name to the mailbox lock for clasp
* slynk/backend/clasp.lisp (mailbox): Add name to mutex.
Cherry-picked-from: SLIME commit f98b050abfd682011b35317b556db901ace71ebe
---
slynk/backend/clasp.lisp | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/slynk/backend/clasp.lisp b/slynk/backend/clasp.lisp
index 7db7796..a8851af 100644
--- a/slynk/backend/clasp.lisp
+++ b/slynk/backend/clasp.lisp
@@ -736,7 +736,7 @@
(defstruct (mailbox (:conc-name mailbox.))
thread
- (mutex (mp:make-lock))
+ (mutex (mp:make-lock :name "SLIMELCK"))
(cvar (mp:make-condition-variable))
(queue '() :type list))
