From: espen <espen>
Date: Wed, 27 Oct 2004 18:40:26 +0000 (+0000)
Subject: Initial checkin
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/commitdiff_plain/38c604ec4b161103576e1ecad95d67209da2967c?hp=42001865ee8becafb814e7d6d4176532e1e112fc

Initial checkin
---

diff --git a/gdk/gdk.asd b/gdk/gdk.asd
new file mode 100644
index 0000000..2ff5130
--- /dev/null
+++ b/gdk/gdk.asd
@@ -0,0 +1,31 @@
+;;; -*- Mode: lisp -*-
+
+(defpackage "GDK-SYSTEM"
+  (:use "COMMON-LISP" "ASDF" "PKG-CONFIG" "SHAREDLIB"))
+
+(in-package "GDK-SYSTEM")
+
+(pkg-exists-p "gtk+-2.0" :atleast-version "2.4.0")
+
+
+(load-shared-library "libgdk_pixbuf-2.0")
+(load-shared-library "libgdk-x11-2.0"
+		     :init "gdk_init"
+		     :prototype '(alien:function
+				  c-call:void
+				  alien:system-area-pointer
+				  alien:system-area-pointer)
+		     :initargs (list (system:int-sap 0) (system:int-sap 0)))
+
+
+
+(defsystem gdk
+    :depends-on (glib)
+    :components ((:file "defpackage")
+		 (:unix-dso "alien"
+		  :components ((:c-source-file "glue"
+				:cflags #.(pkg-cflags "gtk+-2.0"))))
+		 (:file "gdktypes" :depends-on ("defpackage" "alien"))
+		 (:file "gdkevents" :depends-on ("gdktypes"))
+		 (:file "gdk" :depends-on ("gdkevents"))
+		 (:file "export" :depends-on ("gdkevents" "gdktypes" "gdk"))))