Skip to content

Commit f55436c

Browse files
committed
fudge jvm for RT #126495
1 parent 9c86762 commit f55436c

File tree

1 file changed

+4
-1
lines changed

1 file changed

+4
-1
lines changed

S32-io/spurt.t

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -13,13 +13,13 @@ all-basic({ $path });
1313
# filename as IO tests
1414
all-basic({ $path.IO });
1515

16-
1716
sub all-basic(Callable $handle) {
1817
my Blob $buf = "hello world".encode("utf-8");
1918
my $txt = "42";
2019

2120
#?niecza 2 skip ":bin option for slurp fails"
2221
spurt $handle(), $buf;
22+
#?rakudo.jvm 11 skip 'RT #126495 - This type does not support positional operations'
2323
is slurp($path, :bin), $buf, "spurting Buf ok";
2424

2525
spurt $handle(), $txt;
@@ -60,12 +60,14 @@ sub all-basic(Callable $handle) {
6060
#?niecza skip "Unable to resolve method open in type IO"
6161
{
6262
# Spurt on open file
63+
#?rakudo.jvm skip 'RT #126495 - This type does not support positional operations'
6364
{
6465
spurt $path, "42";
6566
is slurp($path), "42", 'can spurt into an open file';
6667
}
6768

6869
# Buf into an open non binary file
70+
#?rakudo.jvm skip 'RT #126495 - This type does not support positional operations'
6971
{
7072
my Buf $buf = Buf.new(0xC0, 0x01, 0xF0, 0x0D);
7173
spurt $path, $buf;
@@ -99,6 +101,7 @@ sub all-basic(Callable $handle) {
99101
my Blob $buf = "meow".encode("ASCII");
100102
$path.IO.spurt($buf);
101103
#?niecza skip "Excess arguments to slurp, unused named bin"
104+
#?rakudo.jvm skip 'RT #126495 - This type does not support positional operations'
102105
is slurp($path, :bin), $buf, "IO::Handle binary slurp";
103106

104107
dies-ok { $path.IO.spurt("nope", :createonly) }, "IO::Handle :createonly dies";

0 commit comments

Comments
 (0)