[svn:parrot] r42280 - trunk/runtime/parrot/library

[jonathan at svn.parrot.org]

Author: jonathan
Date: Thu Nov  5 22:44:38 2009
New Revision: 42280
URL: https://trac.parrot.org/parrot/changeset/42280

Log:
Addition to P6object to make sure it can handle Rakudo ng branch's metamodel requirements.

Modified:
   trunk/runtime/parrot/library/P6object.pir

Modified: trunk/runtime/parrot/library/P6object.pir
==============================================================================
--- trunk/runtime/parrot/library/P6object.pir	Thu Nov  5 22:26:33 2009	(r42279)
+++ trunk/runtime/parrot/library/P6object.pir	Thu Nov  5 22:44:38 2009	(r42280)
@@ -280,6 +280,12 @@
 
   end:
 .end
+.sub 'add_parent' :method :multi(_,P6metaclass,_)
+    .param pmc obj
+    .param pmc parentclass
+    $P0 = getattribute obj, 'parrotclass'
+    self.'add_parent'($P0, parentclass)
+.end
 
 
 =item add_method(name, method, [, 'to'=>parrotclass])