summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2012-06-07 07:12:47 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2012-06-07 07:12:47 (GMT)
commitc0050dd5cd9edb4dc6c44ef057046cf1e2f01a1d (patch)
treea98e38ed7b315ca11a40b7b4af0b7737065ad285 /tests
parent5d1214f529a021ef83372ed19594009cfe9fc3e6 (diff)
downloadtcl-c0050dd5cd9edb4dc6c44ef057046cf1e2f01a1d.zip
tcl-c0050dd5cd9edb4dc6c44ef057046cf1e2f01a1d.tar.gz
tcl-c0050dd5cd9edb4dc6c44ef057046cf1e2f01a1d.tar.bz2
compressing transforms now work with dictionaries, even if raw
Diffstat (limited to 'tests')
-rw-r--r--tests/zlib.test16
1 files changed, 16 insertions, 0 deletions
diff --git a/tests/zlib.test b/tests/zlib.test
index 18b6f55..5d46926 100644
--- a/tests/zlib.test
+++ b/tests/zlib.test
@@ -293,6 +293,22 @@ test zlib-8.11 {transformtion and fconfigure} -setup {
catch {close $inSide}
catch {$strm close}
} -result {358 358}
+test zlib-8.13 {transformtion and fconfigure} -setup {
+ lassign [chan pipe] inSide outSide
+ set strm [zlib stream compress]
+} -constraints {zlib knownBug} -body {
+ set data [$strm add -dictionary $spdyDict $spdyHeaders]
+ zlib push decompress $inSide
+ fconfigure $outSide -blocking 0 -translation binary
+ fconfigure $inSide -translation binary -dictionary $spdyDict
+ puts -nonewline $outSide $data
+ close $outSide
+ list [string length $spdyHeaders] [string length [read $inSide]]
+} -cleanup {
+ catch {close $outSide}
+ catch {close $inSide}
+ catch {$strm close}
+} -result {358 358}
test zlib-9.1 "check fcopy with push" -constraints zlib -setup {
set sfile [makeFile {} testsrc.gz]