Skip to content

Commit a0c5ef2

Browse files
committed
Fix broken seek test setup
The setup tries to open the file in both binary and text mode and then .print()s test data to it. Fix by using the Test::Util helper to create the test file. This test file is not part of 6.c-errata
1 parent a5a46ac commit a0c5ef2

File tree

1 file changed

+3
-5
lines changed

1 file changed

+3
-5
lines changed

S32-io/seek.t

Lines changed: 3 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1,13 +1,11 @@
11
use v6;
2+
use lib <t/spec/packages>;
23
use Test;
4+
use Test::Util;
35

46
plan 3;
57

6-
constant PATH = 't-S32-io-seek-t.tmp';
7-
LEAVE unlink PATH;
8-
9-
sink my $fh = open PATH, :rw, :bin, :enc<ASCII>;
10-
$fh.print: '1234567890abcdefghijABCDEFGHIJ';
8+
my $fh = make-temp-file(:content<1234567890abcdefghijABCDEFGHIJ>).open: :bin;
119

1210
#?rakudo.jvm skip "Method 'sink' not found for invocant of class 'BOOTIO'"
1311
#?DOES 1

0 commit comments

Comments
 (0)