diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2012-06-06 14:48:50 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2012-06-06 14:48:50 (GMT) |
| commit | 3184a4f10783aa04dae53ebabb389e05a7b1bd7e (patch) | |
| tree | fd529f2632f1dc861808b34d03339ed5cae73f7d /generic/tclZlib.c | |
| parent | ab4eaa94dc7ea656bd80c8772528b46f1507ae2d (diff) | |
| download | tcl-3184a4f10783aa04dae53ebabb389e05a7b1bd7e.zip tcl-3184a4f10783aa04dae53ebabb389e05a7b1bd7e.tar.gz tcl-3184a4f10783aa04dae53ebabb389e05a7b1bd7e.tar.bz2 | |
Declare that Tcl provides the zlib 2.0 package.
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 0ff8b50..b970b3d 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! @@ -3127,7 +3136,7 @@ TclZlibInit( */ Tcl_CreateObjCommand(interp, "zlib", ZlibCmd, 0, 0); - return TCL_OK; + return Tcl_PkgProvide(interp, "zlib", TCL_ZLIB_VERSION); } /* |