[svn:parrot] r41270 - trunk/src/pmc

[bacek at svn.parrot.org]

Author: bacek
Date: Tue Sep 15 14:07:39 2009
New Revision: 41270
URL: https://trac.parrot.org/parrot/changeset/41270

Log:
[cage] Explicitly cast enum to INTVAL. NotFound++

Modified:
   trunk/src/pmc/lexinfo.pmc

Modified: trunk/src/pmc/lexinfo.pmc
==============================================================================
--- trunk/src/pmc/lexinfo.pmc	Tue Sep 15 13:46:03 2009	(r41269)
+++ trunk/src/pmc/lexinfo.pmc	Tue Sep 15 14:07:39 2009	(r41270)
@@ -64,7 +64,7 @@
         PARROT_ASSERT(PObj_constant_TEST(SELF));
 
         /* Set value type to INTVAL */
-        Parrot_PCCINVOKE(interp, SELF, CONST_STRING(INTERP, "set_value_type"), "I->", enum_type_INTVAL);
+        Parrot_PCCINVOKE(interp, SELF, CONST_STRING(INTERP, "set_value_type"), "I->", (INTVAL)enum_type_INTVAL);
     }
 
 /*