Skip to content

Commit

Permalink
Revert "Merge pull request #3517 from vrurg/rakudo_3499"
Browse files Browse the repository at this point in the history
This reverts commit 0f223ac, reversing
changes made to 8454f8d.
  • Loading branch information
Altai-man committed May 1, 2020
1 parent 3aac2dc commit 0dc04da
Showing 1 changed file with 5 additions and 11 deletions.
16 changes: 5 additions & 11 deletions src/Perl6/Metamodel/Dispatchers.nqp
Expand Up @@ -77,16 +77,9 @@ class Perl6::Metamodel::BaseDispatcher {
}

method shift_callee() {
my @call := [nqp::null(), nqp::null()];
if self.last_candidate {
if $!next_dispatcher {
@call := $!next_dispatcher.shift_callee;
}
}
else {
@call := self.get_call;
}
@call;
my $callee := @!candidates[$!idx];
++$!idx;
nqp::decont($callee)
}

method add_from_mro(@methods, $class, $sub, :$skip_first = 0) {
Expand Down Expand Up @@ -135,7 +128,8 @@ class Perl6::Metamodel::MethodDispatcher is Perl6::Metamodel::BaseDispatcher {

method vivify_for($sub, $lexpad, $args) {
my $obj := $lexpad<self>;
my @methods := self.add_from_mro([], $obj, $sub);
my $class := nqp::getlexrel($lexpad, '::?CLASS');
my @methods := self.add_from_mro([], $class, $sub);
self.new(:candidates(@methods), :obj($obj), :idx(1))
}

Expand Down

0 comments on commit 0dc04da

Please sign in to comment.