From: Olof-Joachim Frahm <olof@macrolet.net>
Date: Thu, 1 Nov 2012 21:17:43 +0000 (+0100)
Subject: Fix missing G-ERROR foreign type.
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=143745719347729362b1aa8e431ea4678bf4e4da;p=cl-gtk2.git

Fix missing G-ERROR foreign type.
---

diff --git a/glib/glib.gerror.lisp b/glib/glib.gerror.lisp
index 65019c0..9585096 100644
--- a/glib/glib.gerror.lisp
+++ b/glib/glib.gerror.lisp
@@ -4,6 +4,7 @@
   (:domain g-quark)
   (:code :int)
   (:message (:string :free-from-foreign nil)))
+(defctype g-error (:struct g-error))
 
 (defcfun g-error-new-literal :pointer
   (domain g-quark)
@@ -74,4 +75,4 @@
 ;; void                g_propagate_prefixed_error          (GError **dest,
 ;;                                                          GError *src,
 ;;                                                          const gchar *format,
-;;                                                          ...);
\ No newline at end of file
+;;                                                          ...);