[svn:parrot] r35709 - trunk/src/pmc
[email protected] Sat, 17 Jan 2009 23:39:57 -0800 (PST)
Newsgroups
perl.cvs.parrot
Message-ID
<[email protected] >
Author: cotto
Date: Sat Jan 17 23:39:55 2009
New Revision: 35709
Modified:
trunk/src/pmc/unmanagedstruct.pmc
Log:
[pmc] remove a couple PMC_int_val instances
Modified: trunk/src/pmc/unmanagedstruct.pmc
==============================================================================
--- trunk/src/pmc/unmanagedstruct.pmc (original)
+++ trunk/src/pmc/unmanagedstruct.pmc Sat Jan 17 23:39:55 2009
@@ -174,7 +174,7 @@
if (key_next(interp, next))
next = key_next(interp, next);
- offs = PMC_int_val(init);
+ offs = VTABLE_get_integer(interp, init);
#ifdef STRUCT_DEBUG
Parrot_io_eprintf(interp, "offs = %d\n", (int)offs);
@@ -628,7 +628,7 @@
if (type == enum_type_struct) {
PMC *nested = VTABLE_getprop(interp, type_pmc, CONST_STRING(interp, "_struct"));
- size = PMC_int_val(nested);
+ size = VTABLE_get_integer(interp, nested);
}
else
size = data_types[type - enum_first_type].size;