From c91244ef1a2d9bd47a1def8043980822daf2f335 Mon Sep 17 00:00:00 2001
From: Zoffix Znet <cpan@zoffix.com>
Date: Sat, 15 Sep 2018 10:06:15 -0400
Subject: [PATCH] [v6.dt REVIEW] Expan IO::Spec::Win32.basename

Include test with backslash in path, which is a path sep on Win32

Orig: https://github.com/perl6/roast/commit/c3c51ede0
---
 S32-io/io-spec-win.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/S32-io/io-spec-win.t b/S32-io/io-spec-win.t
index d7713a4c0a..889efa345b 100644
--- a/S32-io/io-spec-win.t
+++ b/S32-io/io-spec-win.t
@@ -303,7 +303,7 @@ else {
 
 subtest '.basename' => {
     my @tests = '' => '', '.' => '.', '/' => '', 'foo/' => '', '/.' => '.',
-        'foo/.' => '.', 'foo/..' => '..', 'foo/...' => '...',
+        'foo/.' => '.', 'foo/..' => '..', 'foo/...' => '...', ｢y/\z｣ => 'z',
         'bar/♥foo' => '♥foo', '♥foo' => '♥foo', '♥foo/..' => '..',
         '//server/share' => 'share', '//server/share/' => '';