Skip to content

Commit c648263

Browse files
committed
Tests for split with empty string
1 parent cdf4639 commit c648263

File tree

1 file changed

+3
-1
lines changed

1 file changed

+3
-1
lines changed

t/nqp/59-nqpop.t

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@
22

33
# Test nqp::op pseudo-functions.
44

5-
plan(102);
5+
plan(103);
66

77

88
ok( nqp::add_i(5,2) == 7, 'nqp::add_i');
@@ -34,6 +34,8 @@ ok( nqp::elems(nqp::split('\\s', 'Mary had a little lamb')) == 1, 'nqp::split no
3434
ok( nqp::elems(@items) == 12, 'nqp::split zero length delimiter');
3535
@items := nqp::split('a', 'a man a plan a canal panama');
3636
ok( nqp::elems(@items) == 11 && @items[0] eq '' && @items[10] eq '', 'nqp::split delimiter at ends');
37+
@items := nqp::split('', 'a little lamb');
38+
ok( nqp::join('|', @items) eq 'a| |l|i|t|t|l|e| |l|a|m|b', 'nqp::split("", ...)');
3739

3840
ok( nqp::iseq_i(2, 2) == 1, 'nqp::iseq_i');
3941

0 commit comments

Comments
 (0)