Skip to content

Commit 44d4c1d

Browse files
committed
Mark broken nqp::readlinefh tests as TODO.
Now t/nqp/19-file-ops.t passes cleanly through the test harness.
1 parent 0713cbb commit 44d4c1d

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

t/nqp/19-file-ops.t

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -117,7 +117,8 @@ if nqp::getcomp('nqp').backend.name eq 'parrot' {
117117
ok(1, "ok $_ # Skipped: readlinefh is broken on parrot") for (36, 37, 38, 39, 40);
118118
}
119119
else {
120-
$fh := nqp::open('t/nqp/19-readline.txt', 'r');
120+
$fh := nqp::open('t/nqp/19-readline.txt', 'r') if nqp::getcomp('nqp').backend.name eq 'jvm';
121+
todo("NQP/JVM doesn't handle non-Unix lineendings properly", 5);
121122
ok(nqp::readlinefh($fh) eq "line1\r", 'reading a line till CR');
122123
ok(nqp::readlinefh($fh) eq "line2\r\n", 'reading a line till CRLF');
123124
ok(nqp::readlinefh($fh) eq "line3\n", 'reading a line till LF');

0 commit comments

Comments
 (0)