summaryrefslogtreecommitdiff
path: root/Lisp/libobjcl.lisp
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2008-03-04 15:05:14 +0100
committerMatthias Benkard <code@mail.matthias.benkard.de>2008-03-04 15:05:14 +0100
commit69cf14b4e5ade03daf57657ad1adafc3275bd5da (patch)
tree49e75cc3f7d553017dc0fad7416c0e0a826ba392 /Lisp/libobjcl.lisp
parent0880bd6ab8539d43cde12ca556ea46b2ee0f0518 (diff)
Objective-C layer: Add function objcl_test_foo.
darcs-hash:c52655ddfd12cd8a69285250252705606f3bce35
Diffstat (limited to 'Lisp/libobjcl.lisp')
-rw-r--r--Lisp/libobjcl.lisp2
1 files changed, 2 insertions, 0 deletions
diff --git a/Lisp/libobjcl.lisp b/Lisp/libobjcl.lisp
index 797ee1e..ca8e3d8 100644
--- a/Lisp/libobjcl.lisp
+++ b/Lisp/libobjcl.lisp
@@ -194,6 +194,8 @@
:int
(function :pointer))
+(defcfun ("objcl_test_foo" objcl-test-foo) :void)
+
(defcvar *objcl-current-exception-lock* :pointer)
(defcvar *objcl-current-exception* :pointer)