gtk-glext/gtkglext.package.lisp

   1 (defpackage :gtkglext
   2   (:use :cl :cffi :gobject :gtk :gdk :glib :iter)
   3   (:export #:with-gl-context #:with-matrix-mode
   4            #:gl-drawing-area
   5            #:gl-drawing-area-on-expose
   6            #:gl-drawing-area-on-init
   7            #:gl-drawing-area-on-resize))
   8
   9 (in-package :gtkglext)
  10
  11 (eval-when (:compile-toplevel :load-toplevel :execute)
  12   (define-foreign-library gtkglext
  13     (:unix (:or "libgtkglext-x11-1.0.so.0" "libgtkglext-x11-1.0.so"))
  14     (:windows "libgtkglext-win32-1.0-0.dll")
  15     (t (:default "libgtkglext-1.0")))
  16   (define-foreign-library gdkglext
  17     (:unix (:or "libgdkglext-x11-1.0.so.0" "libgdkglext-x11-1.0.so"))
  18     (:windows "libgdkglext-win32-1.0-0.dll")
  19     (t (:default "libgdkglext-1.0"))))
  20
  21 (use-foreign-library gtkglext)
  22 (use-foreign-library gdkglext)