diff options
| author | dgp <dgp@users.sourceforge.net> | 2023-09-15 16:05:07 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2023-09-15 16:05:07 (GMT) |
| commit | 2766b53d261822dfce8fa4a8b6c158837436fcfb (patch) | |
| tree | 0d0b3db9bbc544881c503ce077da16b83961023d /tests/zipfs.test | |
| parent | 41543bb582a7fa452828311af2e238d87d440525 (diff) | |
| download | tcl-2766b53d261822dfce8fa4a8b6c158837436fcfb.zip tcl-2766b53d261822dfce8fa4a8b6c158837436fcfb.tar.gz tcl-2766b53d261822dfce8fa4a8b6c158837436fcfb.tar.bz2 | |
Test hygiene for supporting -singleproc 1 and -debug 1
Diffstat (limited to 'tests/zipfs.test')
| -rw-r--r-- | tests/zipfs.test | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/zipfs.test b/tests/zipfs.test index 689fd5f..4f980f7 100644 --- a/tests/zipfs.test +++ b/tests/zipfs.test @@ -791,6 +791,7 @@ namespace eval test_ns_zipfs { test.zip testmountA test.zip testmountB/subdir } {} + variable path testzipfsfind absolute-path [file join [zipfs root] testmountA] { test.zip testmountA test.zip testmountB/subdir } [lmap path { @@ -914,7 +915,7 @@ namespace eval test_ns_zipfs { testzipfscanonical drivepath X:/foo/bar [file join [zipfs root] foo bar] -constraints win # (backslashes need additional escaping passed to testzipfscanonical) testzipfscanonical backslashes X:\\\\foo\\\\bar [file join [zipfs root] foo bar] -constraints win - testzipfscanonical backslashes X:/foo\\\\bar [file join [zipfs root] foo bar] -constraints win + testzipfscanonical backslashes-1 X:/foo\\\\bar [file join [zipfs root] foo bar] -constraints win |