Another update from ingydotnet^djgoku

2015-11-18 06:14:39 +00:00 · 2015-11-18 06:14:39 +00:00 · 948b86eafa
commit 948b86eafa
parent 91df62d461
7604 changed files with 108452 additions and 22726 deletions
--- a/Task/Parsing-RPN-calculator-algorithm/Perl-6/parsing-rpn-calculator-algorithm.pl6
+++ b/Task/Parsing-RPN-calculator-algorithm/Perl-6/parsing-rpn-calculator-algorithm.pl6
@ -2,7 +2,7 @@ my $proggie = '3 4 2 * 1 5 - 2 3 ^ ^ / +';

 class RPN is Array {

-    method binop(&infix:<op>) { self.push: self.pop Rop self.pop }
+    method binop(&op) { self.push: self.pop R[&op] self.pop }

    method run($p) {
        for $p.words {