summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2014-05-09 12:03:58 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2014-05-09 12:03:58 (GMT)
commitc9eee4b29ab5763b1c99d721139fa5b7180721ba (patch)
tree69dbd10c630d1f3b12ea46d522ce6e486f506d6e /tests
parent2f3a2a3308b055bd58c2b4cd80aa0202d913ada2 (diff)
parent435b75fc24a85e806029ac4159863e6bf87b6412 (diff)
downloadtcl-c9eee4b29ab5763b1c99d721139fa5b7180721ba.zip
tcl-c9eee4b29ab5763b1c99d721139fa5b7180721ba.tar.gz
tcl-c9eee4b29ab5763b1c99d721139fa5b7180721ba.tar.bz2
Fix [3389978]: Support for paths longer than MAX_PATH on Windows.
Diffstat (limited to 'tests')
-rw-r--r--tests/winFCmd.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/winFCmd.test b/tests/winFCmd.test
index bd50328..28257c6 100644
--- a/tests/winFCmd.test
+++ b/tests/winFCmd.test
@@ -1385,10 +1385,10 @@ test winFCmd-19.5 {Windows extended path names} -constraints nt -setup {
list [catch {
set f [open $tmpfile [list WRONLY CREAT]]
close $f
- } res] errormsg ;#$res
+ } res] $res
} -cleanup {
catch {file delete $tmpfile}
-} -result [list 1 errormsg]
+} -result [list 0 {}]
test winFCmd-19.6 {Windows extended path names} -constraints nt -setup {
set tmpfile [file join $::env(TEMP) tcl[string repeat x 248].tmp]
set tmpfile //?/[file normalize $tmpfile]