diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2012-06-06 14:49:53 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2012-06-06 14:49:53 (GMT) |
| commit | 46792fbf09bf7adfb73ace23bc98157d62f76796 (patch) | |
| tree | 934555da212f3a176ecef4c63cbd3cf59f65859d /generic/tclZlib.c | |
| parent | 70517099bd30eacafe3f440bbab7d352acfe261b (diff) | |
| parent | 3184a4f10783aa04dae53ebabb389e05a7b1bd7e (diff) | |
| download | tcl-46792fbf09bf7adfb73ace23bc98157d62f76796.zip tcl-46792fbf09bf7adfb73ace23bc98157d62f76796.tar.gz tcl-46792fbf09bf7adfb73ace23bc98157d62f76796.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic/tclZlib.c')
| -rw-r--r-- | generic/tclZlib.c | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/generic/tclZlib.c b/generic/tclZlib.c index 63d2aca..585b500 100644 --- a/generic/tclZlib.c +++ b/generic/tclZlib.c @@ -20,6 +20,15 @@ #include "tclIO.h" /* + * The version of the zlib "package" that this implements. Note that this + * thoroughly supersedes the versions included with tclkit, which are "1.1", + * so this is at least "2.0" (there's no general *commitment* to have the same + * interface, even if that is mostly true). + */ + +#define TCL_ZLIB_VERSION "2.0" + +/* * Magic flags used with wbits fields to indicate that we're handling the gzip * format or automatic detection of format. Putting it here is slightly less * gross! @@ -3584,7 +3593,7 @@ TclZlibInit( */ Tcl_CreateObjCommand(interp, "zlib", ZlibCmd, 0, 0); - return TCL_OK; + return Tcl_PkgProvide(interp, "zlib", TCL_ZLIB_VERSION); } /* |