Will Coleda wrote:
I wanted to call attention to part of today's Parrot Sketch:
<allison> - Otherwise, the PMC branch is ready for language testing,
will plan to merge it back into trunk next weekend.
So, language developers (and others); please grab a copy of
https://svn.perl.org/parrot/branches/pdd17pmc and check out the
languages to see how they fare compared to their counterparts in
trunk.
With the attached patch, I try to fix build of dotnet.
Now, all tests fail.
François.
Thanks!
Index: languages/dotnet/pmc/managedpointer.pmc
===================================================================
--- languages/dotnet/pmc/managedpointer.pmc (revision 26295)
+++ languages/dotnet/pmc/managedpointer.pmc (working copy)
@@ -540,7 +540,9 @@
PMC* get_attr(INTVAL idx)
{
- PMC *ref = SELF.load_pmc();
+ PMC *ref;
+ Parrot_PCCINVOKE(interp, SELF, const_string(interp, "load_pmc"),
+ "->P", &ref);
if (ref)
return VTABLE_get_attr(INTERP, ref, idx);
else
@@ -549,7 +551,9 @@
PMC* get_attr_str(STRING* idx)
{
- PMC *ref = SELF.load_pmc();
+ PMC *ref;
+ Parrot_PCCINVOKE(interp, SELF, const_string(interp, "load_pmc"),
+ "->P", &ref);
if (ref)
return VTABLE_get_attr_str(INTERP, ref, idx);
else
@@ -558,14 +562,18 @@
void set_attr(INTVAL idx, PMC* value)
{
- PMC *ref = SELF.load_pmc();
+ PMC *ref;
+ Parrot_PCCINVOKE(interp, SELF, const_string(interp, "load_pmc"),
+ "->P", &ref);
if (ref)
VTABLE_set_attr(INTERP, ref, idx, value);
}
void set_attr_str(STRING* idx, PMC* value)
{
- PMC *ref = SELF.load_pmc();
+ PMC *ref;
+ Parrot_PCCINVOKE(interp, SELF, const_string(interp, "load_pmc"),
+ "->P", &ref);
if (ref)
VTABLE_set_attr_str(INTERP, ref, idx, value);
}