[nongnu] externals/sly c794fe6 30/47: Remove recursive locks for clasp

[ELPA Syncer]

branch: externals/sly
commit c794fe60210611f6dd4180df53284263ff4be41c
Author: Chris Schafmeister <meister@temple.edu>
Commit: João Távora <joaotavora@gmail.com>

    Remove recursive locks for clasp
    
    They weren't needed and we wanted to regularize the make-lock call
    so we had to remove the :recursive keyword argument
    
    * slynk/backend/clasp.lisp (make-lock): No longer recursively MP:MAKE-LOCK.
    
    Cherry-picked-from: SLIME commit 6a42585021d7a0bef0be2bf2df1e3c262ae6e049
    Co-authored-by: João Távora <joaotavora@gmail.com>
---
 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 8c515be..482a342 100644
--- a/slynk/backend/clasp.lisp
+++ b/slynk/backend/clasp.lisp
@@ -707,7 +707,7 @@
         "STOPPED"))
 
   (defimplementation make-lock (&key name)
-    (mp:make-lock :name name :recursive t))
+    (mp:make-lock :name name))
 
   (defimplementation call-with-lock-held (lock function)
     (declare (type function function))