Skip to content

Commit

Permalink
Restore old functionality of .+/.* operators
Browse files Browse the repository at this point in the history
Conform to 6.c specs in the sense of not iterating over roles. Whoever
needs it must use `WALK` method.

Both can possibly be deprecated as `WALK`+`WalkList` provide more
functionality with minimal syntax boilerplate.
  • Loading branch information
vrurg committed Dec 12, 2019
1 parent 0b6a934 commit bb2600d
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/core.c/Mu.pm6
Original file line number Diff line number Diff line change
Expand Up @@ -848,8 +848,8 @@ Perhaps it can be found at https://docs.perl6.org/type/$name"
Nil
}

method !batch-call(Mu \SELF: \name, Capture:D \c, :$throw = False, :$reverse = False) {
my @mro := SELF.^mro(:roles);
method !batch-call(Mu \SELF: \name, Capture:D \c, :$throw = False, :$reverse = False, :$roles = False) {
my @mro := SELF.^mro(:$roles);
my $results := nqp::create(IterationBuffer);
my int $mro_high = $reverse ?? 0 !! @mro.elems - 1;
my int $i = @mro.elems;
Expand Down

0 comments on commit bb2600d

Please sign in to comment.