Merge pull request #503 from zhuomingliang/patch-3

s/=/:=/, there are many similar code use :=, so no reason here is not :)

src/core/metaops.pm

@@ -157,7 +157,7 @@ multi sub METAOP_REDUCE_RIGHT(\op, \triangle) {
 
         gather {
             take $result;
-            while (my $elem = iter.pull-one) !=:= IterationEnd {
+            while (my $elem := iter.pull-one) !=:= IterationEnd {
                 take $result := op.($elem, $result)
             }
         }