Hi,
tests in attach.
Review it, please.
Ilya
2008/10/30 via RT Chris Davaz <[EMAIL PROTECTED]>:
> # New Ticket Created by "Chris Davaz"
> # Please include the string: [perl #60228]
> # in the subject line of all future correspondence about this issue.
> # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=60228 >
>
>
> This is a fix for splitting strings on regular expressions that
> contain zero-width matches. All the tests in split-simple.t pass.
>
Index: S29-str/split-simple.t
===================================================================
--- S29-str/split-simple.t (revision 24166)
+++ S29-str/split-simple.t (working copy)
@@ -1,7 +1,7 @@
use v6;
use Test;
-plan 32;
+plan 34;
=begin description
@@ -64,4 +64,7 @@
ok (''.split('')).elems == 0, q{''.split('') returns empty list};
ok (split('', '')).elems == 0, q{''.split('') returns empty list};
+ok (''.split(/\w/)).elems == 0, q{''.split(/regex/) returns empty list};
+ok ('abc'.split(/\d/)).elems == 0, q{'abc'.split(/\d/) returns empty list};
+
# vim: ft=perl6
