chiark / gitweb /
Added declaration to get rid of a couple of warnings.
authorespen <espen>
Sun, 6 Mar 2005 17:18:00 +0000 (17:18 +0000)
committerespen <espen>
Sun, 6 Mar 2005 17:18:00 +0000 (17:18 +0000)
glib/gcallback.lisp

index e4a33cb2c65af63eec92451452e1a7a2cead56b5..eb35f2d0af6845b13c84b3b6dc9a916c4dd21198 100644 (file)
@@ -15,7 +15,7 @@
 ;; License along with this library; if not, write to the Free Software
 ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 
-;; $Id: gcallback.lisp,v 1.22 2005/02/22 17:29:38 espen Exp $
+;; $Id: gcallback.lisp,v 1.23 2005/03/06 17:18:00 espen Exp $
 
 (in-package "GLIB")
 
@@ -36,6 +36,7 @@ (defcallback closure-marshal (nil
                              (param-values pointer)
                              (invocation-hint pointer) 
                              (callback-id unsigned-int))
+  (declare (ignore gclosure invocation-hint))
   (callback-trampoline callback-id n-params param-values return-value))
 
 ;; Callback function for emission hooks