perl-Glib r1063 - trunk

[tsch svn gnome org]

Author: tsch
Date: Mon Feb  2 20:09:34 2009
New Revision: 1063
URL: http://svn.gnome.org/viewvc/perl-Glib?rev=1063&view=rev

Log:
Hush some compiler warnings.


Modified:
   trunk/ChangeLog
   trunk/GSignal.xs
   trunk/Glib.xs

Modified: trunk/GSignal.xs
==============================================================================
--- trunk/GSignal.xs	(original)
+++ trunk/GSignal.xs	Mon Feb  2 20:09:34 2009
@@ -538,7 +538,7 @@
 	if (((guint)(items-ARGOFFSET)) != query.n_params) 
 		croak ("Incorrect number of arguments for emission of signal %s in class %s; need %d but got %d",
 		       name, G_OBJECT_TYPE_NAME (instance),
-		       query.n_params, items-ARGOFFSET);
+		       query.n_params, (gint) items-ARGOFFSET);
 
 	/* set up the parameters to g_signal_emitv.   this is an array
 	 * of GValues, where [0] is the emission instance, and the rest 
@@ -988,7 +988,7 @@
 		       "expected %d, got %d",
 		       g_signal_name (ihint->signal_id),
 		       1 + query.n_params,
-		       items);
+		       (gint) items);
 
 	instance_and_params = g_new0 (GValue, 1 + query.n_params);
 

Modified: trunk/Glib.xs
==============================================================================
--- trunk/Glib.xs	(original)
+++ trunk/Glib.xs	Mon Feb  2 20:09:34 2009
@@ -106,7 +106,8 @@
 
 	/* look out: len is the length of the input when we call, but
 	 * will be the length of the output when this call finishes. */
-        lname = g_filename_from_utf8 (filename, len, 0, &len, &error);
+        lname = g_filename_from_utf8 ((const gchar *) filename,
+                                      len, 0, &len, &error);
         if (!lname)
         	gperl_croak_gerror (NULL, error);