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

NotFound at svn.parrot.org NotFound at svn.parrot.org
Thu Sep 3 05:30:53 UTC 2009


Author: NotFound
Date: Thu Sep  3 05:30:53 2009
New Revision: 40946
URL: https://trac.parrot.org/parrot/changeset/40946

Log:
[cage] some remaining items from auto_attrs conversions

Modified:
   trunk/src/pmc/fixedintegerarray.pmc
   trunk/src/pmc/nci.pmc
   trunk/src/pmc/object.pmc
   trunk/src/pmc/resizablebooleanarray.pmc
   trunk/src/pmc/resizableintegerarray.pmc

Modified: trunk/src/pmc/fixedintegerarray.pmc
==============================================================================
--- trunk/src/pmc/fixedintegerarray.pmc	Thu Sep  3 05:08:36 2009	(r40945)
+++ trunk/src/pmc/fixedintegerarray.pmc	Thu Sep  3 05:30:53 2009	(r40946)
@@ -636,10 +636,6 @@
     }
 
     VTABLE void thaw(visit_info *info) {
-
-        Parrot_FixedIntegerArray_attributes *attrs =
-            mem_allocate_zeroed_typed(Parrot_FixedIntegerArray_attributes);
-        PMC_data(SELF) = attrs;
         PObj_custom_destroy_SET(SELF);
 
         if (info->extra_flags == EXTRA_IS_NULL) {

Modified: trunk/src/pmc/nci.pmc
==============================================================================
--- trunk/src/pmc/nci.pmc	Thu Sep  3 05:08:36 2009	(r40945)
+++ trunk/src/pmc/nci.pmc	Thu Sep  3 05:30:53 2009	(r40946)
@@ -255,7 +255,6 @@
         void                  *orig_func;
 
         PMC * const ret     = pmc_new(INTERP, SELF->vtable->base_type);
-        PMC_data(ret)       = mem_allocate_zeroed_typed(Parrot_NCI_attributes);
         nci_info_ret        = PARROT_NCI(ret);
 
         /* FIXME if data is malloced (JIT/i386!) then we need

Modified: trunk/src/pmc/object.pmc
==============================================================================
--- trunk/src/pmc/object.pmc	Thu Sep  3 05:08:36 2009	(r40945)
+++ trunk/src/pmc/object.pmc	Thu Sep  3 05:30:53 2009	(r40946)
@@ -695,10 +695,6 @@
         if (info->extra_flags == EXTRA_IS_PROP_HASH) {
             SUPER(info);
         }
-        else if (info->extra_flags == EXTRA_IS_NULL) {
-            /* Allocate the object's core data struct */
-            PMC_data(SELF) = mem_allocate_zeroed_typed(Parrot_Object_attributes);
-        }
     }
 
 /*

Modified: trunk/src/pmc/resizablebooleanarray.pmc
==============================================================================
--- trunk/src/pmc/resizablebooleanarray.pmc	Thu Sep  3 05:08:36 2009	(r40945)
+++ trunk/src/pmc/resizablebooleanarray.pmc	Thu Sep  3 05:30:53 2009	(r40946)
@@ -454,8 +454,6 @@
         STRING * const   s        = VTABLE_shift_string(INTERP, io);
 
         bit_array      = (unsigned char*)Parrot_str_to_cstring(INTERP, s);
-        PMC_data(SELF) =
-            mem_allocate_zeroed_typed(Parrot_ResizableBooleanArray_attributes);
         SET_ATTR_size(INTERP, SELF, tail_pos);
         SET_ATTR_resize_threshold(INTERP, SELF, head_pos);
         SET_ATTR_bit_array(INTERP, SELF, bit_array);

Modified: trunk/src/pmc/resizableintegerarray.pmc
==============================================================================
--- trunk/src/pmc/resizableintegerarray.pmc	Thu Sep  3 05:08:36 2009	(r40945)
+++ trunk/src/pmc/resizableintegerarray.pmc	Thu Sep  3 05:30:53 2009	(r40946)
@@ -294,11 +294,6 @@
     }
 
     VTABLE void thaw(visit_info *info) {
-
-        Parrot_ResizableIntegerArray_attributes *attrs =
-            mem_allocate_zeroed_typed(Parrot_ResizableIntegerArray_attributes);
-        PMC_data(SELF) = attrs;
-
         if (info->extra_flags == EXTRA_IS_NULL) {
             IMAGE_IO * const io = info->image_io;
             const INTVAL n = VTABLE_shift_integer(INTERP, io);


More information about the parrot-commits mailing list