[svn:parrot] r38515 - branches/rep6object/src/pmc
jonathan at svn.parrot.org
jonathan at svn.parrot.org
Wed May 6 22:50:41 UTC 2009
Author: jonathan
Date: Wed May 6 22:50:41 2009
New Revision: 38515
URL: https://trac.parrot.org/parrot/changeset/38515
Log:
[rep6object] Need to claim that we're an abstraction when the proto-object.
Modified:
branches/rep6object/src/pmc/protoobject.pmc
Modified: branches/rep6object/src/pmc/protoobject.pmc
==============================================================================
--- branches/rep6object/src/pmc/protoobject.pmc Wed May 6 22:07:39 2009 (r38514)
+++ branches/rep6object/src/pmc/protoobject.pmc Wed May 6 22:50:41 2009 (r38515)
@@ -321,6 +321,14 @@
return VTABLE_get_string(interp, longname);
}
}
+
+ VTABLE INTVAL does(STRING *check) {
+ Parrot_Protoobject_attributes *po = (Parrot_Protoobject_attributes*)PMC_data(SELF);
+ if (PMC_IS_NULL(po->attrib_store))
+ if (Parrot_str_equal(interp, check, CONST_STRING(interp, "abstraction")))
+ return 1;
+ return SUPER(check);
+ }
}
/*
More information about the parrot-commits
mailing list