[patch] fix :calling-convention warning in OS X LW FLI

James Bielman <[email protected]> Sat, 04 Jun 2005 04:38:04 -0700

Newsgroups	gmane.lisp.uffi.devel
Message-ID	<[email protected]>

Hi,

The following small patch fixes a warning due to the Mac OS X
Lispworks FLI not supporting :CALLING-CONVENTION when defining foreign
functions:

--- functions.lisp.orig	2005-06-04 02:17:36.000000000 -0700
+++ functions.lisp	2005-06-04 02:17:44.000000000 -0700
@@ -200,7 +200,7 @@
        ,@(if module (list :module module) (values))
        :result-type ,result-type
       :language :ansi-c
-       :calling-convention :cdecl)
+       #-macosx :calling-convention #-macosx :cdecl)
     #+(and mcl (not openmcl))
     `(eval-when (:compile-toplevel :load-toplevel :execute)
        (ccl:define-entry-point (,lisp-name ,foreign-name)

James