Add indices() as a sub

rakudo · Aug 4, 2015 · 45f2924 · 45f2924
1 parent d11c710
commit 45f2924
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/core/Cool.pm b/src/core/Cool.pm
@@ -322,6 +322,10 @@ sub uc(Cool $s)                    { $s.uc }
 sub tc(Cool $s)                    { $s.tc }
 sub tclc(Cool $s)                  { $s.tclc }
 
+sub indices(Cool $s,$needle,$pos=0,:$overlap) {
+    $s.indices($needle,$pos,:$overlap);
+}
+
 proto sub rindex($, $, $?) is pure { * };
 multi sub rindex(Cool $s, Cool $needle, Cool $pos) { $s.rindex($needle, $pos) };
 multi sub rindex(Cool $s, Cool $needle)            { $s.rindex($needle) };