glib/gobject.init.lisp

   1 (defpackage :cl-gtk2-init
   2   (:use :cl :glib))
   3
   4 (in-package :cl-gtk2-init)
   5
   6 (at-init ()
   7  (eval-when (:compile-toplevel :load-toplevel :execute)
   8    (cffi:define-foreign-library gobject
   9      (:unix (:or "libgobject-2.0.so.0" "libgobject-2.0.so"))
  10      (:windows "libgobject-2.0-0.dll")
  11      (t "libgobject-2.0")))
  12
  13  (cffi:use-foreign-library gobject))
  14