From a1adbc7935a44abaa3d69f101cecaf10b94658fe Mon Sep 17 00:00:00 2001
From: Stelian Ionescu <sionescu@cddr.org>
Date: Wed, 29 Jul 2020 00:46:16 -0400
Subject: [PATCH] Fix typo

---
 apiv2/impl-clisp.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/apiv2/impl-clisp.lisp b/apiv2/impl-clisp.lisp
index 4fd3a8e..2d698a3 100644
--- a/apiv2/impl-clisp.lisp
+++ b/apiv2/impl-clisp.lisp
@@ -80,7 +80,7 @@
 (defun %acquire-recursive-lock (lock waitp timeout)
   (when timeout
     (signal-not-implemented 'acquire-recursive-lock :timeout))
-  (%acquire-lock lock wait-p nil))
+  (%acquire-lock lock waitp nil))
 
 (defun %release-recursive-lock (lock)
   (%release-lock lock))
-- 
2.11.4.GIT