diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2016-02-03 15:29:04 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2016-02-03 15:29:04 (GMT) |
commit | 8b4717e9ad0214e985ed2fe6ee6d673b9d1cf603 (patch) | |
tree | d2a42671d16e15a6c2d8ef9a5d0530e54eb89a7f /tests/zlib.test | |
parent | 2f90de6166e0253955f4e7ce895ddb63c0d4f05d (diff) | |
download | tcl-8b4717e9ad0214e985ed2fe6ee6d673b9d1cf603.zip tcl-8b4717e9ad0214e985ed2fe6ee6d673b9d1cf603.tar.gz tcl-8b4717e9ad0214e985ed2fe6ee6d673b9d1cf603.tar.bz2 |
[25842c161] Prevent zero-length compress actions in [zlib] streaming API.
Diffstat (limited to 'tests/zlib.test')
-rw-r--r-- | tests/zlib.test | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/zlib.test b/tests/zlib.test index b1d43fb..7a486ba 100644 --- a/tests/zlib.test +++ b/tests/zlib.test @@ -132,6 +132,12 @@ test zlib-7.6 {zlib stream} zlib { $s close lappend result $data } {{} 69f34b6a abcdeEDCBA..} +test zlib-7.7 {zlib stream: Bug 25842c161} -constraints zlib -body { + set s [zlib stream deflate] + $s put {} +} -cleanup { + catch {$s close} +} -result "" test zlib-8.1 {zlib transformation} -constraints zlib -setup { set file [makeFile {} test.gz] |