From: Dmitry Kalyanov <Kalyanov.Dmitry@gmail.com>
Date: Fri, 7 Aug 2009 22:24:48 +0000 (+0400)
Subject: glib: Commented out debugging code
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=f5db9ba8c281b54fc5dde3d3bb024a0f86c77ec3;p=cl-gtk2.git

glib: Commented out debugging code
---

diff --git a/glib/gobject.boxed.lisp b/glib/gobject.boxed.lisp
index 218112a..82023d4 100644
--- a/glib/gobject.boxed.lisp
+++ b/glib/gobject.boxed.lisp
@@ -35,10 +35,10 @@
   (:method (type-info native)
     (g-boxed-copy (g-boxed-info-g-type type-info) native)))
 
-(defmethod boxed-copy-fn :before (type-info native)
+#+nil(defmethod boxed-copy-fn :before (type-info native)
   (format t "(boxed-copy-fn ~A ~A)~%" (g-boxed-info-name type-info) native))
 
-(defgeneric boxed-free-fn (type-info native)
+#+nil(defgeneric boxed-free-fn (type-info native)
   (:method (type-info native)
     (g-boxed-free (g-boxed-info-g-type type-info) native)))