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

NotFound at svn.parrot.org NotFound at svn.parrot.org
Thu Aug 13 09:32:22 UTC 2009


Author: NotFound
Date: Thu Aug 13 09:32:18 2009
New Revision: 40517
URL: https://trac.parrot.org/parrot/changeset/40517

Log:
set auto_attrs on CodeString PMC

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

Modified: branches/auto_attrs/src/pmc/codestring.pmc
==============================================================================
--- branches/auto_attrs/src/pmc/codestring.pmc	Thu Aug 13 08:51:43 2009	(r40516)
+++ branches/auto_attrs/src/pmc/codestring.pmc	Thu Aug 13 09:32:18 2009	(r40517)
@@ -34,18 +34,10 @@
 #  include <unicode/uchar.h>
 #endif
 
-pmclass CodeString extends String provides string {
+pmclass CodeString extends String provides string auto_attrs {
     ATTR INTVAL last_line_number; /* most recent line number seen   */
     ATTR INTVAL last_pos;         /* most recent byte position seen */
 
-    VTABLE void init() {
-        Parrot_CodeString_attributes *attrs =
-            mem_allocate_zeroed_typed(Parrot_CodeString_attributes);
-        attrs->str_val = Parrot_str_new_noinit(INTERP, enum_stringrep_one, 0);
-        PMC_data(SELF) = attrs;
-        PObj_custom_mark_destroy_SETALL(SELF);
-    }
-
 /*
 
 =item C<emit(string fmt [, pmc args ] [, pmc hash ])>


More information about the parrot-commits mailing list