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);
     }

Reply via email to