[svn:parrot] r11127 - trunk/src/classes

[particle]

Author: particle
Date: Thu Jan 12 11:44:56 2006
New Revision: 11127

Modified:
   trunk/src/classes/integer.pmc
   trunk/src/classes/orderedhash.pmc
Log:
PMC: remove compiler warnings for Integer and OrderedHash PMCs

Modified: trunk/src/classes/integer.pmc
==============================================================================
--- trunk/src/classes/integer.pmc       (original)
+++ trunk/src/classes/integer.pmc       Thu Jan 12 11:44:56 2006
@@ -1252,7 +1252,7 @@ C<base> must be between 2 and 36, inclus
                     "get_as_base: base out of bounds");
 
         return int_to_str(interpreter, buf,
-                (HUGEINTVAL)PMC_int_val(SELF), base);
+                (HUGEINTVAL)PMC_int_val(SELF), (char)base);
     }
 
 /*

Modified: trunk/src/classes/orderedhash.pmc
==============================================================================
--- trunk/src/classes/orderedhash.pmc   (original)
+++ trunk/src/classes/orderedhash.pmc   Thu Jan 12 11:44:56 2006
@@ -578,7 +578,7 @@ we have to preserver key/value order.
 */
 
     void visit(visit_info *info) {
-        UINTVAL i, n;
+        UINTVAL i;
         HashBucket *b;
         void *key;
         IMAGE_IO *io = info->image_io;