Skip to content

Commit 465795c

Browse files
committed
[io grant] Test IO::Path.lines(*) does not crash
Rakudo fix: rakudo/rakudo@0c6281518e
1 parent 70be436 commit 465795c

File tree

1 file changed

+5
-1
lines changed

1 file changed

+5
-1
lines changed

S16-io/lines.t

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -14,7 +14,7 @@ my @endings =
1414
## adjusted plan to allow fine grained fudging for rakudo.jvm
1515
#plan @endings * (1 + 3 * ( (3 * 5) + 6));
1616
my $extra_tests_jvm_fudging = 2 * 3 * ( 3 * ( 6 + 2 ) );
17-
plan 4 + @endings * (1 + 3 * ( 5 + 6)) + $extra_tests_jvm_fudging;
17+
plan 5 + @endings * (1 + 3 * ( 5 + 6)) + $extra_tests_jvm_fudging;
1818

1919
my $filename = 't/spec/S16-io/lines.testing';
2020
my @text = <zero one two three four>;
@@ -276,4 +276,8 @@ lives-ok {
276276
.lines.rotor(:partial, 1 + .lines.elems).eager with $*PROGRAM.IO
277277
}, '.lines does not crash with partial .rotor';
278278

279+
280+
is-deeply run(:out, $*EXECUTABLE, '-e', .say for ^3).out.lines(*).List,
281+
("0", "1", "2"), 'can use Whatever as limit to IO::Pipe.lines';
282+
279283
# vim: ft=perl6

0 commit comments

Comments
 (0)