gistfile1.txt

Index: runtime/parrot/library/P6object.pir
===================================================================
--- runtime/parrot/library/P6object.pir (revision 47970)
+++ runtime/parrot/library/P6object.pir (working copy)
@@ -111,7 +111,13 @@
 .sub 'WHAT' :method :nsentry
     .local pmc how, what
     how = self.'HOW'()
-    .tailcall how.'WHAT'()
+    what = getattribute how, 'protoobject'
+    .return (what)
 .end


@@ -162,25 +168,13 @@

 =over

-=item WHAT()
-
-Return the protoobject for this metaclass.
-
-=cut
-
-.namespace ['P6metaclass']
-
-.sub 'WHAT' :method :nsentry
-    $P0 = getattribute self, 'protoobject'
-    .return ($P0)
-.end
-
 =item isa(x)

 Return a true value if the invocant 'isa' C<x>.

 =cut

+.namespace ['P6metaclass']
 .sub 'isa' :method :multi(_,_, _)
     .param pmc obj
     .param pmc x