From a356b8b0829640ba5a07e749883cc3d78e4b50bd Mon Sep 17 00:00:00 2001
From: John Connors <johnc@yagc.ndo.co.uk>
Date: Sun, 29 Jun 2008 11:32:08 +0100
Subject: [PATCH] Added library loader.

---
 trivial-gtk.lisp | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 trivial-gtk.lisp

diff --git a/trivial-gtk.lisp b/trivial-gtk.lisp
new file mode 100644
index 0000000..b4771f8
--- /dev/null
+++ b/trivial-gtk.lisp
@@ -0,0 +1,21 @@
+
+(defpackage :trivial-gtk
+  (:use :cl :cffi))
+
+(in-package :trivial-gtk)
+
+#-(or win32 mswindows windows darwin)
+(eval-when (:compile-toplevel :load-toplevel :execute)
+  (cffi:load-foreign-library "libglib-2.0.so")
+  (cffi:load-foreign-library "libgmodule-2.0.so")
+  (cffi:load-foreign-library "libgobject-2.0.so")
+  (cffi:load-foreign-library "libcario.so")
+  (cffi:load-foreign-library "libpango-1.0.so")
+  (cffi:load-foreign-library "libpangocairo-1.0.so")
+  (cffi:load-foreign-library "libgdk_pixbuf-2.0.so")
+  (cffi:load-foreign-library "libgthread-2.0.so")
+  (cffi:load-foreign-library "libatk-1.0.so")
+  (cffi:load-foreign-library "libgdk-x11-2.0.so")
+  (cffi:load-foreign-library "libgtk-x11-2.0.so"))
+
+
-- 
2.11.4.GIT