X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=gdk%2Fgdk.package.lisp;h=9604c9471d1acf296b64ed564186f5167f650775;hb=402600a5af7e5ed830a4313eeb9cfb9c8fc4b0d3;hp=7e600a913ebcc0040d77325bb8d9c46416194cb2;hpb=449168ece946ea586313094e0305782884ae9b2f;p=cl-gtk2.git diff --git a/gdk/gdk.package.lisp b/gdk/gdk.package.lisp old mode 100644 new mode 100755 index 7e600a9..9604c94 --- a/gdk/gdk.package.lisp +++ b/gdk/gdk.package.lisp @@ -1,12 +1,6 @@ (defpackage :gdk - (:use :cl :gobject :cffi) + (:use :cl :gobject :cffi :pango :iter) (:export #:gdk-window-events - #:gdk-gc-set-rgb-fg-color - #:gdk-drawable-get-size - #:gdk-draw-line - #:gdk-gc-new - #:drawable-get-size - #:gdk-draw-layout #:gdk-atom-as-string)) (in-package :gdk) @@ -14,6 +8,12 @@ (eval-when (:compile-toplevel :load-toplevel :execute) (define-foreign-library gdk (:unix (:or "libgdk-x11-2.0.so.0" "libgdk-x11-2.0.so")) - (t "libgdk-2.0"))) + (:windows "libgdk-win32-2.0-0.dll") + (t "libgdk-2.0")) + (define-foreign-library gdk-pixbuf + (:unix (:or "libgdk_pixbuf-2.0.so.0" "libgdk_pixbuf-2.0.so")) + (:windows (:or "libgdk_pixbuf-win32-2.0-0" "libgdk_pixbuf-2.0-0.dll")) + (t "libgdk_pixbuf-2.0"))) -(use-foreign-library gdk) \ No newline at end of file +(use-foreign-library gdk) +(use-foreign-library gdk-pixbuf) \ No newline at end of file