[mcclim-cvs] CVS mcclim/Backends/gtkairo

[dlichteblau]

Update of /project/mcclim/cvsroot/mcclim/Backends/gtkairo
In directory clnet:/tmp/cvs-serv18841

Modified Files:
	gtk-ffi.lisp 
Log Message:
* gtk-ffi.lisp: #+darwin library loading, thanks to Cyrus Harmon.


--- /project/mcclim/cvsroot/mcclim/Backends/gtkairo/gtk-ffi.lisp	2006/05/02 13:00:12	1.5
+++ /project/mcclim/cvsroot/mcclim/Backends/gtkairo/gtk-ffi.lisp	2006/05/07 14:30:24	1.6
@@ -19,12 +19,20 @@
 
 (in-package :clim-gtkairo)
 
-#-(or win32 mswindows windows)
+#-(or win32 mswindows windows darwin)
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (cffi:load-foreign-library "libcairo.so")
   (cffi:load-foreign-library "libgthread-2.0.so")
   (cffi:load-foreign-library "libgtk-x11-2.0.so"))
 
+#+darwin
+(eval-when (:compile-toplevel :load-toplevel :execute)
+  (let ((cffi:*foreign-library-directories*
+	 (cons "/opt/local/lib/" cffi:*foreign-library-directories*)))
+    (cffi:load-foreign-library "libcairo.dylib")
+    (cffi:load-foreign-library "libgthread-2.0.dylib")
+    (cffi:load-foreign-library "libgtk-x11-2.0.dylib")))
+
 #+(or win32 mswindows windows)
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (cffi:load-foreign-library "libcairo-2.dll")