summaryrefslogtreecommitdiff
path: root/Lisp/libobjcl.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'Lisp/libobjcl.lisp')
-rw-r--r--Lisp/libobjcl.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/Lisp/libobjcl.lisp b/Lisp/libobjcl.lisp
index d8e8b07..d038c62 100644
--- a/Lisp/libobjcl.lisp
+++ b/Lisp/libobjcl.lisp
@@ -145,10 +145,10 @@
(return-typespec :string)
(arg-typespecs (:array :string)))
-(defcfun ("objcl_acquire_lock" %objcl-release-lock) :pointer
+(defcfun ("objcl_acquire_lock" %objcl-acquire-lock) :pointer
(lock :pointer))
-(defcfun ("objcl_release_lock" %objcl-acquire-lock) :pointer
+(defcfun ("objcl_release_lock" %objcl-release-lock) :pointer
(lock :pointer))
(defcfun ("objcl_create_class" %objcl-create-class) :pointer