summaryrefslogtreecommitdiffstats
path: root/tests/zlib.test
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2013-01-30 08:19:22 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2013-01-30 08:19:22 (GMT)
commit52368789306fda3ae17cf554333fa3adb617ba0a (patch)
tree10729608c91275933e64387693a867743563aab0 /tests/zlib.test
parentbc3ea33b9b409c840682f5feb2b4efb4c78029f8 (diff)
parent75972077579a3e9bf1363e817260d11f17d60266 (diff)
downloadtcl-52368789306fda3ae17cf554333fa3adb617ba0a.zip
tcl-52368789306fda3ae17cf554333fa3adb617ba0a.tar.gz
tcl-52368789306fda3ae17cf554333fa3adb617ba0a.tar.bz2
merge changes from trunknovem_no_startcmd
Diffstat (limited to 'tests/zlib.test')
-rw-r--r--tests/zlib.test14
1 files changed, 14 insertions, 0 deletions
diff --git a/tests/zlib.test b/tests/zlib.test
index 5f1e5fc..891dba0 100644
--- a/tests/zlib.test
+++ b/tests/zlib.test
@@ -826,6 +826,20 @@ test zlib-11.2 "Bug #3390073: mis-appled gzip filtering" -setup {
} -cleanup {
removeFile $file
} -result {1000 /foo/bar 0}
+test zlib-11.3 {Bug 3595576 variant} -setup {
+ set file [makeFile {} test.input]
+} -constraints zlib -body {
+ set f [open $file wb]
+ puts -nonewline [zlib push gzip $f -header {filename /foo/bar}] \
+ [string repeat "hello" 1000]
+ close $f
+ set f [open $file rb]
+ set d [read $f]
+ close $f
+ zlib gunzip $d -header noSuchNs::foo
+} -cleanup {
+ removeFile $file
+} -returnCodes error -result {can't set "noSuchNs::foo": parent namespace doesn't exist}
::tcltest::cleanupTests
return