From e95d66c3148a64b6fe1a6b2aa940ecc41867ce4a Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Thu, 20 Sep 2007 22:59:26 +0200
Subject: Fix the coercion rules for FLOAT and BOOLEAN values.

darcs-hash:d24e207d8f1e0357c8a63ec058ec61318675e89f
---
 Lisp/libobjcl.lisp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'Lisp/libobjcl.lisp')

diff --git a/Lisp/libobjcl.lisp b/Lisp/libobjcl.lisp
index 9849392..85dfc45 100644
--- a/Lisp/libobjcl.lisp
+++ b/Lisp/libobjcl.lisp
@@ -72,7 +72,8 @@
   (obj :pointer))
 
 (defcfun objcl-get-nil :pointer)
-
+(defcfun objcl-get-yes :long)
+(defcfun objcl-get-no :long)
 
 (defun initialise-runtime ()
   "Initialise the Objective C runtime.
-- 
cgit v1.2.3