[svn:parrot] r40420 - branches/auto_attrs/src/pmc

NotFound at svn.parrot.org NotFound at svn.parrot.org
Wed Aug 5 12:44:10 UTC 2009


Author: NotFound
Date: Wed Aug  5 12:44:10 2009
New Revision: 40420
URL: https://trac.parrot.org/parrot/changeset/40420

Log:
set auto_attrs in nci pmc

Modified:
   branches/auto_attrs/src/pmc/nci.pmc

Modified: branches/auto_attrs/src/pmc/nci.pmc
==============================================================================
--- branches/auto_attrs/src/pmc/nci.pmc	Wed Aug  5 12:34:24 2009	(r40419)
+++ branches/auto_attrs/src/pmc/nci.pmc	Wed Aug  5 12:44:10 2009	(r40420)
@@ -94,7 +94,7 @@
 }
 
 
-pmclass NCI need_ext {
+pmclass NCI need_ext auto_attrs {
     ATTR STRING    *signature;              /* The signature. */
     ATTR void      *func;                   /* Function pointer to call. */
     ATTR void      *orig_func;              /* Function pointer
@@ -148,12 +148,9 @@
 */
 
     VTABLE void init() {
-        PMC_data(SELF) = mem_allocate_zeroed_typed(Parrot_NCI_attributes);
-
         /* Mark that we're not a raw NCI. */
         PObj_flag_CLEAR(private2, SELF);
         PObj_custom_mark_SET(SELF);
-        PObj_active_destroy_SET(SELF);
     }
 
 /*
@@ -224,25 +221,6 @@
 
 /*
 
-=item C<void destroy()>
-
-Destroys the NCI, freeing any allocated memory.
-
-=cut
-
-*/
-
-    VTABLE void destroy() {
-        if (PMC_data(SELF)) {
-            Parrot_NCI_attributes * const nci_info = PARROT_NCI(SELF);
-
-            mem_sys_free(nci_info);
-            PMC_data(SELF) = NULL;
-        }
-    }
-
-/*
-
 =item C<PMC *clone()>
 
 Creates and returns a clone of the NCI.


More information about the parrot-commits mailing list