gistfile1.txt

1..10
ok 1 - Cannot call chdir without an argument
ok 2 - chdir gave a true value
ok 3 - Directory has changed
not ok 4 - Current directory is 't' subfolder (absolute)

# Failed test 'Current directory is 't' subfolder (absolute)'
# at t\spec\S32-io\chdir.rakudo.moar line 26
# expected: 'C:\consulting\rakudo\t'
#      got: 'C:\consulting\rakudo/t'
ok 5 - chdir gave a true value
ok 6 - Change back up to .. worked
ok 7 - chdir gave a true value
ok 8 - Current directory is 't' subfolder (relative)
ok 9 - # SKIP spec non-conformance due to missing sink context
ok 10 - # SKIP spec non-conformance due to missing sink context
# FUDGED!
# Looks like you failed 1 tests of 10

gistfile2.txt

1..3
Cannot call method 'item' on a null object
  in method tmpdir at src/gen/m-CORE.setting:29985
  in sub INITIALIZE_DYNAMIC at src/gen/m-CORE.setting:48323
  in sub DYNAMIC at src/gen/m-CORE.setting:1129
  in block <unit> at t\spec\S16-io\tmpdir.t:7

# Looks like you planned 3 tests, but ran 0

gistfile3.txt

perl6-m -Ilib t\spec\S32-io\io-spec-cygwin.t
1..102
ok 1 - canonpath: '///../../..//./././a//b/.././c/././' -> '/a/b/../c'
ok 2 - canonpath: '' -> ''
ok 3 - canonpath: 'a/../../b/c' -> 'a/../../b/c'
ok 4 - canonpath: '/.' -> '/'
ok 5 - canonpath: '/./' -> '/'
ok 6 - canonpath: '/a/./' -> '/a'
ok 7 - canonpath: '/a/.' -> '/a'
ok 8 - canonpath: '/../../' -> '/'
ok 9 - canonpath: '/../..' -> '/'
ok 10 - canonpath: 'a:\b\c' -> 'a:/b/c'
ok 11 - canonpath: 'c:a\.\b' -> 'c:a/b'
ok 12 - splitdir: '' -> ''
ok 13 - splitdir: '/d1/d2/d3/' -> ',d1,d2,d3,'
ok 14 - splitdir: 'd1/d2/d3/' -> 'd1,d2,d3,'
ok 15 - splitdir: '/d1/d2/d3' -> ',d1,d2,d3'
ok 16 - splitdir: 'd1/d2/d3' -> 'd1,d2,d3'
ok 17 - No argument returns empty string
ok 18 - catdir: $( ) -> ''
ok 19 - catdir: "/" -> '/'
ok 20 - catdir: $("", "d1", "d2", "d3", "") -> '/d1/d2/d3'
ok 21 - catdir: $("d1", "d2", "d3", "") -> 'd1/d2/d3'
ok 22 - catdir: $("", "d1", "d2", "d3") -> '/d1/d2/d3'
ok 23 - catdir: $("d1", "d2", "d3") -> 'd1/d2/d3'
ok 24 - catdir: $("/", "d2/d3") -> '/d2/d3'
ok 25 - catdir: $("/", "/d1/d2") -> '/d1/d2'
ok 26 - catdir: $("//notreally", "/UNC") -> '/notreally/UNC'
ok 27 - split: "/" -> ',/,/'
ok 28 - split: "." -> ',.,.'
ok 29 - split: "file" -> ',.,file'
ok 30 - split: "/dir" -> ',/,dir'
ok 31 - split: "/d1/d2/d3/" -> ',/d1/d2,d3'
ok 32 - split: "d1/d2/d3/" -> ',d1/d2,d3'
ok 33 - split: "/d1/d2/d3/." -> ',/d1/d2/d3,.'
ok 34 - split: "/d1/d2/d3/.." -> ',/d1/d2/d3,..'
ok 35 - split: "/d1/d2/d3/.file" -> ',/d1/d2/d3,.file'
ok 36 - split: "d1/d2/d3/file" -> ',d1/d2/d3,file'
ok 37 - split: "/../../d1/" -> ',/../..,d1'
ok 38 - split: "/././d1/" -> ',/./.,d1'
ok 39 - split: "c:/d1\\d2\\" -> 'c:,/d1,d2'
ok 40 - split: "//unc/share" -> '//unc/share,/,/'
ok 41 - join: $("", "", "file") -> 'file'
ok 42 - join: $("", "/d1/d2/d3/", "") -> '/d1/d2/d3/'
ok 43 - join: $("", "d1/d2/d3/", "") -> 'd1/d2/d3/'
ok 44 - join: $("", "/d1/d2/d3/.", "") -> '/d1/d2/d3/.'
ok 45 - join: $("", "/d1/d2/d3/..", "") -> '/d1/d2/d3/..'
ok 46 - join: $("", "/d1/d2/d3/", ".file") -> '/d1/d2/d3/.file'
ok 47 - join: $("", "d1/d2/d3/", "file") -> 'd1/d2/d3/file'
ok 48 - join: $("", "/../../d1/", "") -> '/../../d1/'
ok 49 - join: $("", "/././d1/", "") -> '/././d1/'
ok 50 - join: $("d:", "d2/d3/", "") -> 'd:d2/d3/'
ok 51 - join: $("d:/", "d2", "d3/") -> 'd:/d2/d3/'
ok 52 - splitpath: "file" -> ',,file'
ok 53 - splitpath: "/d1/d2/d3/" -> ',/d1/d2/d3/,'
ok 54 - splitpath: "d1/d2/d3/" -> ',d1/d2/d3/,'
ok 55 - splitpath: "/d1/d2/d3/." -> ',/d1/d2/d3/.,'
ok 56 - splitpath: "/d1/d2/d3/.." -> ',/d1/d2/d3/..,'
ok 57 - splitpath: "/d1/d2/d3/.file" -> ',/d1/d2/d3/,.file'
ok 58 - splitpath: "d1/d2/d3/file" -> ',d1/d2/d3/,file'
ok 59 - splitpath: "/../../d1/" -> ',/../../d1/,'
ok 60 - splitpath: "/././d1/" -> ',/././d1/,'
ok 61 - catpath: $("", "", "file") -> 'file'
ok 62 - catpath: $("", "/d1/d2/d3/", "") -> '/d1/d2/d3/'
ok 63 - catpath: $("", "d1/d2/d3/", "") -> 'd1/d2/d3/'
ok 64 - catpath: $("", "/d1/d2/d3/.", "") -> '/d1/d2/d3/.'
ok 65 - catpath: $("", "/d1/d2/d3/..", "") -> '/d1/d2/d3/..'
ok 66 - catpath: $("", "/d1/d2/d3/", ".file") -> '/d1/d2/d3/.file'
ok 67 - catpath: $("", "d1/d2/d3/", "file") -> 'd1/d2/d3/file'
ok 68 - catpath: $("", "/../../d1/", "") -> '/../../d1/'
ok 69 - catpath: $("", "/././d1/", "") -> '/././d1/'
ok 70 - catpath: $("d:", "d2/d3/", "") -> 'd:d2/d3/'
ok 71 - catpath: $("d:/", "d2", "d3/") -> 'd:/d2/d3/'
ok 72 - catfile: $("a", "b", "c") -> 'a/b/c'
ok 73 - catfile: $("a", "b", "./c") -> 'a/b/c'
ok 74 - catfile: $("./a", "b", "c") -> 'a/b/c'
ok 75 - catfile: "c" -> 'c'
ok 76 - catfile: "./c" -> 'c'
ok 77 - abs2rel: $("/t1/t2/t3", "/t1/t2/t3") -> '.'
ok 78 - abs2rel: $("/t1/t2/t4", "/t1/t2/t3") -> '../t4'
ok 79 - abs2rel: $("/t1/t2", "/t1/t2/t3") -> '..'
ok 80 - abs2rel: $("/t1/t2/t3/t4", "/t1/t2/t3") -> 't4'
ok 81 - abs2rel: $("/t4/t5/t6", "/t1/t2/t3") -> '../../../t4/t5/t6'
ok 82 - abs2rel: $("/", "/t1/t2/t3") -> '../../..'
ok 83 - abs2rel: $("///", "/t1/t2/t3") -> '../../..'
ok 84 - abs2rel: $("/.", "/t1/t2/t3") -> '../../..'
ok 85 - abs2rel: $("/./", "/t1/t2/t3") -> '../../..'
ok 86 - abs2rel: $("/t1/t2/t3", "/") -> 't1/t2/t3'
ok 87 - abs2rel: $("/t1/t2/t3", "/t1") -> 't2/t3'
ok 88 - abs2rel: $("t1/t2/t3", "t1") -> 't2/t3'
ok 89 - abs2rel: $("t1/t2/t3", "t4") -> '../t1/t2/t3'
ok 90 - rel2abs: $("t4", "/t1/t2/t3") -> '/t1/t2/t3/t4'
ok 91 - rel2abs: $("t4/t5", "/t1/t2/t3") -> '/t1/t2/t3/t4/t5'
ok 92 - rel2abs: $(".", "/t1/t2/t3") -> '/t1/t2/t3'
ok 93 - rel2abs: $("..", "/t1/t2/t3") -> '/t1/t2/t3/..'
ok 94 - rel2abs: $("../t4", "/t1/t2/t3") -> '/t1/t2/t3/../t4'
not ok 95 - rel2abs: $("/t1", "/t1/t2/t3") -> '/t1'

# Failed test 'rel2abs: $("/t1", "/t1/t2/t3") -> '/t1''
# at src/gen/m-CORE.setting line 16689
# expected: '/t1'
#      got: 'C:/t1'
ok 96 - rel2abs: $("//t1/t2/t3", "/foo") -> '//t1/t2/t3'
ok 97 - curdir is "."
ok 98 - devnull is /dev/null
ok 99 - rootdir is "\"
ok 100 - updir is ".."
ok 101 - # SKIP cygwin on-platform tests
ok 102 - # SKIP cygwin on-platform tests
# Looks like you failed 1 tests of 102

gistfile4.txt

C:\consulting\rakudo>perl6-m -Ilib t\spec\S32-io\io-spec-win.t
1..209
ok 1 - canonpath: '' -> ''
ok 2 - canonpath: 'a:' -> 'A:'
ok 3 - canonpath: 'A:f' -> 'A:f'
ok 4 - canonpath: 'A:/' -> 'A:\'
ok 5 - canonpath: 'a\..\..\b\c' -> 'a\..\..\b\c'
ok 6 - canonpath: '//a\b//c' -> '\\a\b\c'
ok 7 - canonpath: '/a/..../c' -> '\a\....\c'
ok 8 - canonpath: '//a/b\c' -> '\\a\b\c'
ok 9 - canonpath: '////' -> '\'
ok 10 - canonpath: '//' -> '\'
ok 11 - canonpath: '/.' -> '\'
ok 12 - canonpath: '//a/b/../../c' -> '\\a\b\c'
ok 13 - canonpath: '\../temp\' -> '\temp'
ok 14 - canonpath: '\../' -> '\'
ok 15 - canonpath: '\..\' -> '\'
ok 16 - canonpath: '/../' -> '\'
ok 17 - canonpath: '/..\' -> '\'
ok 18 - canonpath: 'd1/../foo' -> 'd1\..\foo'
ok 19 - canonpath(:parent): 'foo\bar\..' -> 'foo'
ok 20 - canonpath(:parent): 'foo/bar/baz/../..' -> 'foo'
ok 21 - canonpath(:parent): '/foo/..' -> '\'
ok 22 - canonpath(:parent): 'foo/..' -> '.'
ok 23 - canonpath(:parent): 'foo/../bar/../baz' -> 'baz'
ok 24 - canonpath(:parent): 'foo/../../bar' -> '..\bar'
ok 25 - canonpath(:parent): 'foo/bar/baz/../..' -> 'foo'
ok 26 - canonpath(:parent): '../../..' -> '..\..\..'
ok 27 - canonpath(:parent): '\..\..\..' -> '\'
ok 28 - canonpath(:parent): '/foo/../..' -> '\'
ok 29 - canonpath(:parent): 'C:\..\foo' -> 'C:\foo'
ok 30 - canonpath(:parent): 'C:..' -> 'C:..'
ok 31 - canonpath(:parent): '\\server\share\..' -> '\\server\share'
ok 32 - canonpath(:parent): '0' -> '0'
ok 33 - canonpath(:parent): '/..//..usr/bin/../foo/.///ef' -> '\..usr\foo\ef'
# Warning expected here:
use of uninitialized value $path of type Any in string context  in block <unit> at t\spec\S32-io\io-spec-win.t:52

ok 34 - canonpath: Any -> ''
ok 35 - splitdir: '' -> ''
ok 36 - splitdir: '\d1/d2\d3/' -> ',d1,d2,d3,'
ok 37 - splitdir: 'd1/d2\d3/' -> 'd1,d2,d3,'
ok 38 - splitdir: '\d1/d2\d3' -> ',d1,d2,d3'
ok 39 - splitdir: 'd1/d2\d3' -> 'd1,d2,d3'
ok 40 - No argument returns empty string
ok 41 - catdir: "/" -> '\'
ok 42 - catdir: $("/", "../") -> '\'
ok 43 - catdir: $("/", "..\\") -> '\'
ok 44 - catdir: $("\\", "../") -> '\'
ok 45 - catdir: $("\\", "..\\") -> '\'
ok 46 - catdir: $("//d1", "d2") -> '\\d1\d2'
ok 47 - catdir: $("\\d1\\", "d2") -> '\d1\d2'
ok 48 - catdir: $("\\d1", "d2") -> '\d1\d2'
ok 49 - catdir: $("\\d1", "\\d2") -> '\d1\d2'
ok 50 - catdir: $("\\d1", "\\d2\\") -> '\d1\d2'
ok 51 - catdir: $("", "/d1", "d2") -> '\d1\d2'
ok 52 - catdir: $("", "", "/d1", "d2") -> '\d1\d2'
ok 53 - catdir: $("", "//d1", "d2") -> '\d1\d2'
ok 54 - catdir: $("", "", "//d1", "d2") -> '\d1\d2'
ok 55 - catdir: $("", "d1", "", "d2", "") -> '\d1\d2'
ok 56 - catdir: $("", "d1", "d2", "d3", "") -> '\d1\d2\d3'
ok 57 - catdir: $("d1", "d2", "d3", "") -> 'd1\d2\d3'
ok 58 - catdir: $("", "d1", "d2", "d3") -> '\d1\d2\d3'
ok 59 - catdir: $("d1", "d2", "d3") -> 'd1\d2\d3'
ok 60 - catdir: $("A:/d1", "d2", "d3") -> 'A:\d1\d2\d3'
ok 61 - catdir: $("A:/d1", "d2", "d3", "") -> 'A:\d1\d2\d3'
ok 62 - catdir: $("A:/d1", "B:/d2", "d3", "") -> 'A:\d1\B:\d2\d3'
ok 63 - catdir: "A:/" -> 'A:\'
ok 64 - catdir: $("\\", "foo") -> '\foo'
ok 65 - catdir: $("", "", "..") -> '\'
ok 66 - catdir: $("A:", "foo") -> 'A:foo'
ok 67 - splitpath: "file" -> ',,file'
ok 68 - splitpath: "\\d1/d2\\d3/" -> ',\d1/d2\d3/,'
ok 69 - splitpath: "d1/d2\\d3/" -> ',d1/d2\d3/,'
ok 70 - splitpath: "\\d1/d2\\d3/." -> ',\d1/d2\d3/.,'
ok 71 - splitpath: "\\d1/d2\\d3/.." -> ',\d1/d2\d3/..,'
ok 72 - splitpath: "\\d1/d2\\d3/.file" -> ',\d1/d2\d3/,.file'
ok 73 - splitpath: "\\d1/d2\\d3/file" -> ',\d1/d2\d3/,file'
ok 74 - splitpath: "d1/d2\\d3/file" -> ',d1/d2\d3/,file'
ok 75 - splitpath: "C:\\d1/d2\\d3/" -> 'C:,\d1/d2\d3/,'
ok 76 - splitpath: "C:d1/d2\\d3/" -> 'C:,d1/d2\d3/,'
ok 77 - splitpath: "C:\\d1/d2\\d3/file" -> 'C:,\d1/d2\d3/,file'
ok 78 - splitpath: "C:d1/d2\\d3/file" -> 'C:,d1/d2\d3/,file'
ok 79 - splitpath: "C:\\../d2\\d3/file" -> 'C:,\../d2\d3/,file'
ok 80 - splitpath: "C:../d2\\d3/file" -> 'C:,../d2\d3/,file'
ok 81 - splitpath: "\\../..\\d1/" -> ',\../..\d1/,'
ok 82 - splitpath: "\\./.\\d1/" -> ',\./.\d1/,'
ok 83 - splitpath: "\\\\node\\share\\d1/d2\\d3/" -> '\\node\share,\d1/d2\d3/,'
ok 84 - splitpath: "\\\\node\\share\\d1/d2\\d3/file" -> '\\node\share,\d1/d2\d3/,file'
ok 85 - splitpath: "\\\\node\\share\\d1/d2\\file" -> '\\node\share,\d1/d2\,file'
ok 86 - splitpath: Capture.new(list => ("file",), hash => {"nofile" => Bool::True}) -> ',file,'
ok 87 - splitpath: Capture.new(list => ("\\d1/d2\\d3/",), hash => {"nofile" => Bool::True}) -> ',\d1/d2\d3/,'
ok 88 - splitpath: Capture.new(list => ("d1/d2\\d3/",), hash => {"nofile" => Bool::True}) -> ',d1/d2\d3/,'
ok 89 - splitpath: Capture.new(list => ("\\\\node\\share\\d1/d2\\d3/",), hash => {"nofile" => Bool::True}) -> '\\node\share,\d1/d2\d3/,'
ok 90 - catpath: $("", "", "file") -> 'file'
ok 91 - catpath: $("", "\\d1/d2\\d3/", "") -> '\d1/d2\d3/'
ok 92 - catpath: $("", "d1/d2\\d3/", "") -> 'd1/d2\d3/'
ok 93 - catpath: $("", "\\d1/d2\\d3/.", "") -> '\d1/d2\d3/.'
ok 94 - catpath: $("", "\\d1/d2\\d3/..", "") -> '\d1/d2\d3/..'
ok 95 - catpath: $("", "\\d1/d2\\d3/", ".file") -> '\d1/d2\d3/.file'
ok 96 - catpath: $("", "\\d1/d2\\d3/", "file") -> '\d1/d2\d3/file'
ok 97 - catpath: $("", "d1/d2\\d3/", "file") -> 'd1/d2\d3/file'
ok 98 - catpath: $("C:", "\\d1/d2\\d3/", "") -> 'C:\d1/d2\d3/'
ok 99 - catpath: $("C:", "d1/d2\\d3/", "") -> 'C:d1/d2\d3/'
ok 100 - catpath: $("C:", "\\d1/d2\\d3/", "file") -> 'C:\d1/d2\d3/file'
ok 101 - catpath: $("C:", "d1/d2\\d3/", "file") -> 'C:d1/d2\d3/file'
ok 102 - catpath: $("C:", "\\../d2\\d3/", "file") -> 'C:\../d2\d3/file'
ok 103 - catpath: $("C:", "../d2\\d3/", "file") -> 'C:../d2\d3/file'
ok 104 - catpath: $("", "\\../..\\d1/", "") -> '\../..\d1/'
ok 105 - catpath: $("", "\\./.\\d1/", "") -> '\./.\d1/'
ok 106 - catpath: $("C:", "foo", "bar") -> 'C:foo\bar'
ok 107 - catpath: $("\\\\node\\share", "\\d1/d2\\d3/", "") -> '\\node\share\d1/d2\d3/'
ok 108 - catpath: $("\\\\node\\share", "\\d1/d2\\d3/", "file") -> '\\node\share\d1/d2\d3/file'
ok 109 - catpath: $("\\\\node\\share", "\\d1/d2\\", "file") -> '\\node\share\d1/d2\file'
# split tests
ok 110 - split: "\\" -> ',\,\'
ok 111 - split: "." -> ',.,.'
ok 112 - split: "file" -> ',.,file'
ok 113 - split: "\\d1/d2\\d3/" -> ',\d1/d2,d3'
ok 114 - split: "d1/d2\\d3/" -> ',d1/d2,d3'
ok 115 - split: "\\d1/d2\\d3/." -> ',\d1/d2\d3,.'
ok 116 - split: "\\d1/d2\\d3/.." -> ',\d1/d2\d3,..'
ok 117 - split: "\\d1/d2\\d3/.file" -> ',\d1/d2\d3,.file'
ok 118 - split: "\\d1/d2\\d3/file" -> ',\d1/d2\d3,file'
ok 119 - split: "d1/d2\\d3/file" -> ',d1/d2\d3,file'
ok 120 - split: "C:\\d1/d2\\d3/" -> 'C:,\d1/d2,d3'
ok 121 - split: "C:d1/d2\\d3/" -> 'C:,d1/d2,d3'
ok 122 - split: "C:\\d1/d2\\d3/file" -> 'C:,\d1/d2\d3,file'
ok 123 - split: "C:d1/d2\\d3/file" -> 'C:,d1/d2\d3,file'
ok 124 - split: "C:\\../d2\\d3/file" -> 'C:,\../d2\d3,file'
ok 125 - split: "C:../d2\\d3/file" -> 'C:,../d2\d3,file'
ok 126 - split: "\\../..\\d1/" -> ',\../..,d1'
ok 127 - split: "\\./.\\d1/" -> ',\./.,d1'
ok 128 - split: "//unc/share" -> '//unc/share,\,\'
ok 129 - split: "\\\\node\\share\\d1/d2\\d3/" -> '\\node\share,\d1/d2,d3'
ok 130 - split: "\\\\node\\share\\d1/d2\\d3/file" -> '\\node\share,\d1/d2\d3,file'
ok 131 - split: "\\\\node\\share\\d1/d2\\file" -> '\\node\share,\d1/d2,file'
# join tests
ok 132 - join: $("", "\\", "\\") -> '\'
ok 133 - join: $("", "/", "\\") -> '/'
ok 134 - join: $("", "\\", "/") -> '\'
ok 135 - join: $("", ".", ".") -> '.'
ok 136 - join: $("", "", "file") -> 'file'
ok 137 - join: $("", ".", "file") -> 'file'
ok 138 - join: $("", "\\d1/d2\\d3/", "") -> '\d1/d2\d3/'
ok 139 - join: $("", "d1/d2\\d3/", "") -> 'd1/d2\d3/'
ok 140 - join: $("", "\\d1/d2\\d3/.", "") -> '\d1/d2\d3/.'
ok 141 - join: $("", "\\d1/d2\\d3/..", "") -> '\d1/d2\d3/..'
ok 142 - join: $("", "\\d1/d2\\d3/", ".file") -> '\d1/d2\d3/.file'
ok 143 - join: $("", "\\d1/d2\\d3/", "file") -> '\d1/d2\d3/file'
ok 144 - join: $("", "d1/d2\\d3/", "file") -> 'd1/d2\d3/file'
ok 145 - join: $("C:", "\\d1/d2\\d3/", "") -> 'C:\d1/d2\d3/'
ok 146 - join: $("C:", "d1/d2\\d3/", "") -> 'C:d1/d2\d3/'
ok 147 - join: $("C:", "\\d1/d2\\d3/", "file") -> 'C:\d1/d2\d3/file'
ok 148 - join: $("C:", "d1/d2\\d3/", "file") -> 'C:d1/d2\d3/file'
ok 149 - join: $("C:", "\\../d2\\d3/", "file") -> 'C:\../d2\d3/file'
ok 150 - join: $("C:", "../d2\\d3/", "file") -> 'C:../d2\d3/file'
ok 151 - join: $("", "\\../..\\d1/", "") -> '\../..\d1/'
ok 152 - join: $("", "\\./.\\d1/", "") -> '\./.\d1/'
ok 153 - join: $("C:", "foo", "bar") -> 'C:foo\bar'
ok 154 - join: $("\\\\server\\share", "\\", "\\") -> '\\server\share'
ok 155 - join: $("\\\\node\\share", "\\d1/d2\\d3/", "") -> '\\node\share\d1/d2\d3/'
ok 156 - join: $("\\\\node\\share", "\\d1/d2\\d3/", "file") -> '\\node\share\d1/d2\d3/file'
ok 157 - join: $("\\\\node\\share", "\\d1/d2\\", "file") -> '\\node\share\d1/d2\file'
ok 158 - is-absolute: ok "/"
ok 159 - is-absolute: ok "\"
ok 160 - is-absolute: ok "C:\"
ok 161 - is-absolute: ok "C:\foo/bar"
ok 162 - is-absolute: ok "\\server\share"
ok 163 - is-absolute: nok "foo/bar"
ok 164 - is-absolute: nok "."
ok 165 - is-absolute: nok "C:"
ok 166 - is-absolute: nok "C:dir\file.txt"
ok 167 - catfile: $("a", "b", "c") -> 'a\b\c'
ok 168 - catfile: $("a", "b", ".\\c") -> 'a\b\c'
ok 169 - catfile: $(".\\a", "b", "c") -> 'a\b\c'
ok 170 - catfile: "c" -> 'c'
ok 171 - catfile: ".\\c" -> 'c'
ok 172 - catfile: $("a/..", "../b") -> 'a\..\..\b'
ok 173 - catfile: $("A:", "foo") -> 'A:foo'
ok 174 - abs2rel: $("/t1/t2/t3", "/t1/t2/t3") -> '.'
ok 175 - abs2rel: $("/t1/t2/t4", "/t1/t2/t3") -> '..\t4'
ok 176 - abs2rel: $("/t1/t2", "/t1/t2/t3") -> '..'
ok 177 - abs2rel: $("/t1/t2/t3/t4", "/t1/t2/t3") -> 't4'
ok 178 - abs2rel: $("/t4/t5/t6", "/t1/t2/t3") -> '..\..\..\t4\t5\t6'
ok 179 - abs2rel: $("/", "/t1/t2/t3") -> '..\..\..'
ok 180 - abs2rel: $("///", "/t1/t2/t3") -> '..\..\..'
ok 181 - abs2rel: $("/.", "/t1/t2/t3") -> '..\..\..'
ok 182 - abs2rel: $("/./", "/t1/t2/t3") -> '..\..\..'
ok 183 - abs2rel: $("\\\\a/t1/t2/t4", "/t2/t3") -> '\\a\t1\t2\t4'
ok 184 - abs2rel: $("//a/t1/t2/t4", "/t2/t3") -> '\\a\t1\t2\t4'
ok 185 - abs2rel: $("A:/t1/t2/t3", "A:/t1/t2/t3") -> '.'
ok 186 - abs2rel: $("A:/t1/t2/t3/t4", "A:/t1/t2/t3") -> 't4'
ok 187 - abs2rel: $("A:/t1/t2/t3", "A:/t1/t2/t3/t4") -> '..'
ok 188 - abs2rel: $("A:/t1/t2/t3", "B:/t1/t2/t3") -> 'A:\t1\t2\t3'
ok 189 - abs2rel: $("A:/t1/t2/t3/t4", "B:/t1/t2/t3") -> 'A:\t1\t2\t3\t4'
ok 190 - abs2rel: "E:/foo/bar/baz" -> 'E:\foo\bar\baz'
ok 191 - abs2rel: $("C:\\Windows\\System32", "C:\\") -> 'Windows\System32'
ok 192 - abs2rel: $("\\\\computer2\\share3\\foo.txt", "\\\\computer2\\share3") -> 'foo.txt'
ok 193 - rel2abs: $("temp", "C:/") -> 'C:\temp'
ok 194 - rel2abs: $("temp", "C:/a") -> 'C:\a\temp'
ok 195 - rel2abs: $("temp", "C:/a/") -> 'C:\a\temp'
ok 196 - rel2abs: $("../", "C:/") -> 'C:\'
ok 197 - rel2abs: $("../", "C:/a") -> 'C:\a\..'
ok 198 - rel2abs: $("\\foo", "C:/a") -> 'C:\foo'
ok 199 - rel2abs: $("temp", "//prague_main/work/") -> '\\prague_main\work\temp'
ok 200 - rel2abs: $("../temp", "//prague_main/work/") -> '\\prague_main\work\temp'
ok 201 - rel2abs: $("temp", "//prague_main/work") -> '\\prague_main\work\temp'
ok 202 - rel2abs: $("../", "//prague_main/work") -> '\\prague_main\work'
ok 203 - curdir is "."
ok 204 - devnull is nul
ok 205 - rootdir is "\"
ok 206 - updir is ".."
ok 207 - devnull is nul
ok 208 - rootdir is "\"
Cannot call method 'item' on a null object
  in method tmpdir at src/gen/m-CORE.setting:29985
  in method tmpdir at src/gen/m-CORE.setting:29379
  in block <unit> at t\spec\S32-io\io-spec-win.t:301

# Looks like you planned 209 tests, but ran 208