Browse files

[p6object] Fix a bug so that Foo.HOW.WHAT returns the proto-object fo…

…r the metaclass as it should, not Foo.

git-svn-id: https://svn.parrot.org/parrot/trunk@47972 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
  • Loading branch information...
1 parent 4a2df99 commit cac19aa641dc0840634507441cd94d6c1d257b50 jonathan committed Jul 3, 2010
Showing with 3 additions and 14 deletions.
  1. +3 −14 runtime/parrot/library/P6object.pir
View
17 runtime/parrot/library/P6object.pir
@@ -111,7 +111,8 @@ Return the C<P6protoobject> for the invocant.
.sub 'WHAT' :method :nsentry
.local pmc how, what
how = self.'HOW'()
- .tailcall how.'WHAT'()
+ what = getattribute how, 'protoobject'
+ .return (what)
.end
@@ -162,25 +163,13 @@ below).
=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

0 comments on commit cac19aa

Please sign in to comment.