develooper Front page | perl.cvs.parrot | Postings from January 2009

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

From:
cotto
Date:
January 17, 2009 23:40
Subject:
[svn:parrot] r35709 - trunk/src/pmc
Message ID:
20090118073957.5EC2DCB9AE@x12.develooper.com
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;



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About