[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