2 (:use :cl :cffi :gobject :gtk :gdk :glib :iter)
3 (:export #:with-gl-context #:with-matrix-mode
5 #:gl-drawing-area-on-expose
6 #:gl-drawing-area-on-init))
10 (eval-when (:compile-toplevel :load-toplevel :execute)
11 (define-foreign-library gtkglext
12 (:unix (:or "libgtkglext-x11-1.0.so.0" "libgtkglext-x11-1.0.so"))
13 (t (:default "libgtkglext-1.0")))
14 (define-foreign-library gdkglext
15 (:unix (:or "libgdkglext-x11-1.0.so.0" "libgdkglext-x11-1.0.so"))
16 (t (:default "libgdkglext-1.0"))))
18 (use-foreign-library gtkglext)
19 (use-foreign-library gdkglext)