Merge branch 'nom' into newio

rakudo · Jan 3, 2015 · 0ae5d10 · 0ae5d10
2 parents 44cb1d7 + 167f5f4
commit 0ae5d10
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/core/List.pm b/src/core/List.pm
@@ -702,4 +702,6 @@ sub splice(@arr, $offset = 0, $size?, *@values) {
     @arr.splice($offset, $size, @values)
 }
 
+multi sub infix:<cmp>(@a, @b) { (@a Zcmp @b).first(&prefix:<?>) || @a <=> @b }
+
 # vim: ft=perl6 expandtab sw=4