summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2008-12-11 14:17:23 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2008-12-11 14:17:23 (GMT)
commit6f25f950eeb02f5f136b2f306c52db1593d2430f (patch)
tree8dfdd63a6c9ae94dd943874a85cd5ed25b0a43a9
parent061506df27139e5bb86419bf227198af1ae4ff52 (diff)
downloadtcl-6f25f950eeb02f5f136b2f306c52db1593d2430f.zip
tcl-6f25f950eeb02f5f136b2f306c52db1593d2430f.tar.gz
tcl-6f25f950eeb02f5f136b2f306c52db1593d2430f.tar.bz2
regen
-rw-r--r--generic/tclDecls.h133
-rw-r--r--generic/tclStubInit.c14
2 files changed, 145 insertions, 2 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h
index 525b613..45805f2 100644
--- a/generic/tclDecls.h
+++ b/generic/tclDecls.h
@@ -8,7 +8,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclDecls.h,v 1.160 2008/12/09 20:16:29 dgp Exp $
+ * RCS: @(#) $Id: tclDecls.h,v 1.161 2008/12/11 14:17:23 dkf Exp $
*/
#ifndef _TCLDECLS
@@ -3687,6 +3687,77 @@ EXTERN int Tcl_InterpActive (Tcl_Interp * interp);
EXTERN void Tcl_BackgroundException (Tcl_Interp * interp,
int code);
#endif
+#ifndef Tcl_ZlibDeflate_TCL_DECLARED
+#define Tcl_ZlibDeflate_TCL_DECLARED
+/* 610 */
+EXTERN int Tcl_ZlibDeflate (Tcl_Interp * interp, int format,
+ Tcl_Obj * data, int level,
+ Tcl_Obj * gzipHeaderDictObj);
+#endif
+#ifndef Tcl_ZlibInflate_TCL_DECLARED
+#define Tcl_ZlibInflate_TCL_DECLARED
+/* 611 */
+EXTERN int Tcl_ZlibInflate (Tcl_Interp * interp, int format,
+ Tcl_Obj * data, int buffersize,
+ Tcl_Obj * gzipHeaderDictObj);
+#endif
+#ifndef Tcl_ZlibCRC32_TCL_DECLARED
+#define Tcl_ZlibCRC32_TCL_DECLARED
+/* 612 */
+EXTERN unsigned int Tcl_ZlibCRC32 (unsigned int crc, const char * buf,
+ int len);
+#endif
+#ifndef Tcl_ZlibAdler32_TCL_DECLARED
+#define Tcl_ZlibAdler32_TCL_DECLARED
+/* 613 */
+EXTERN unsigned int Tcl_ZlibAdler32 (unsigned int adler,
+ const char * buf, int len);
+#endif
+#ifndef Tcl_ZlibStreamInit_TCL_DECLARED
+#define Tcl_ZlibStreamInit_TCL_DECLARED
+/* 614 */
+EXTERN int Tcl_ZlibStreamInit (Tcl_Interp * interp, int mode,
+ int format, int level, Tcl_Obj * dictObj,
+ Tcl_ZlibStream * zshandle);
+#endif
+#ifndef Tcl_ZlibStreamGetCommandName_TCL_DECLARED
+#define Tcl_ZlibStreamGetCommandName_TCL_DECLARED
+/* 615 */
+EXTERN Tcl_Obj * Tcl_ZlibStreamGetCommandName (
+ Tcl_ZlibStream zshandle);
+#endif
+#ifndef Tcl_ZlibStreamEof_TCL_DECLARED
+#define Tcl_ZlibStreamEof_TCL_DECLARED
+/* 616 */
+EXTERN int Tcl_ZlibStreamEof (Tcl_ZlibStream zshandle);
+#endif
+#ifndef Tcl_ZlibStreamAdler32_TCL_DECLARED
+#define Tcl_ZlibStreamAdler32_TCL_DECLARED
+/* 617 */
+EXTERN int Tcl_ZlibStreamAdler32 (Tcl_ZlibStream zshandle);
+#endif
+#ifndef Tcl_ZlibStreamPut_TCL_DECLARED
+#define Tcl_ZlibStreamPut_TCL_DECLARED
+/* 618 */
+EXTERN int Tcl_ZlibStreamPut (Tcl_ZlibStream zshandle,
+ Tcl_Obj * data, int flush);
+#endif
+#ifndef Tcl_ZlibStreamGet_TCL_DECLARED
+#define Tcl_ZlibStreamGet_TCL_DECLARED
+/* 619 */
+EXTERN int Tcl_ZlibStreamGet (Tcl_ZlibStream zshandle,
+ Tcl_Obj * data, int count);
+#endif
+#ifndef Tcl_ZlibStreamClose_TCL_DECLARED
+#define Tcl_ZlibStreamClose_TCL_DECLARED
+/* 620 */
+EXTERN int Tcl_ZlibStreamClose (Tcl_ZlibStream zshandle);
+#endif
+#ifndef Tcl_ZlibStreamReset_TCL_DECLARED
+#define Tcl_ZlibStreamReset_TCL_DECLARED
+/* 621 */
+EXTERN int Tcl_ZlibStreamReset (Tcl_ZlibStream zshandle);
+#endif
typedef struct TclStubHooks {
const struct TclPlatStubs *tclPlatStubs;
@@ -4356,6 +4427,18 @@ typedef struct TclStubs {
void (*tcl_TransferResult) (Tcl_Interp * sourceInterp, int result, Tcl_Interp * targetInterp); /* 607 */
int (*tcl_InterpActive) (Tcl_Interp * interp); /* 608 */
void (*tcl_BackgroundException) (Tcl_Interp * interp, int code); /* 609 */
+ int (*tcl_ZlibDeflate) (Tcl_Interp * interp, int format, Tcl_Obj * data, int level, Tcl_Obj * gzipHeaderDictObj); /* 610 */
+ int (*tcl_ZlibInflate) (Tcl_Interp * interp, int format, Tcl_Obj * data, int buffersize, Tcl_Obj * gzipHeaderDictObj); /* 611 */
+ unsigned int (*tcl_ZlibCRC32) (unsigned int crc, const char * buf, int len); /* 612 */
+ unsigned int (*tcl_ZlibAdler32) (unsigned int adler, const char * buf, int len); /* 613 */
+ int (*tcl_ZlibStreamInit) (Tcl_Interp * interp, int mode, int format, int level, Tcl_Obj * dictObj, Tcl_ZlibStream * zshandle); /* 614 */
+ Tcl_Obj * (*tcl_ZlibStreamGetCommandName) (Tcl_ZlibStream zshandle); /* 615 */
+ int (*tcl_ZlibStreamEof) (Tcl_ZlibStream zshandle); /* 616 */
+ int (*tcl_ZlibStreamAdler32) (Tcl_ZlibStream zshandle); /* 617 */
+ int (*tcl_ZlibStreamPut) (Tcl_ZlibStream zshandle, Tcl_Obj * data, int flush); /* 618 */
+ int (*tcl_ZlibStreamGet) (Tcl_ZlibStream zshandle, Tcl_Obj * data, int count); /* 619 */
+ int (*tcl_ZlibStreamClose) (Tcl_ZlibStream zshandle); /* 620 */
+ int (*tcl_ZlibStreamReset) (Tcl_ZlibStream zshandle); /* 621 */
} TclStubs;
#if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
@@ -6868,6 +6951,54 @@ extern const TclStubs *tclStubsPtr;
#define Tcl_BackgroundException \
(tclStubsPtr->tcl_BackgroundException) /* 609 */
#endif
+#ifndef Tcl_ZlibDeflate
+#define Tcl_ZlibDeflate \
+ (tclStubsPtr->tcl_ZlibDeflate) /* 610 */
+#endif
+#ifndef Tcl_ZlibInflate
+#define Tcl_ZlibInflate \
+ (tclStubsPtr->tcl_ZlibInflate) /* 611 */
+#endif
+#ifndef Tcl_ZlibCRC32
+#define Tcl_ZlibCRC32 \
+ (tclStubsPtr->tcl_ZlibCRC32) /* 612 */
+#endif
+#ifndef Tcl_ZlibAdler32
+#define Tcl_ZlibAdler32 \
+ (tclStubsPtr->tcl_ZlibAdler32) /* 613 */
+#endif
+#ifndef Tcl_ZlibStreamInit
+#define Tcl_ZlibStreamInit \
+ (tclStubsPtr->tcl_ZlibStreamInit) /* 614 */
+#endif
+#ifndef Tcl_ZlibStreamGetCommandName
+#define Tcl_ZlibStreamGetCommandName \
+ (tclStubsPtr->tcl_ZlibStreamGetCommandName) /* 615 */
+#endif
+#ifndef Tcl_ZlibStreamEof
+#define Tcl_ZlibStreamEof \
+ (tclStubsPtr->tcl_ZlibStreamEof) /* 616 */
+#endif
+#ifndef Tcl_ZlibStreamAdler32
+#define Tcl_ZlibStreamAdler32 \
+ (tclStubsPtr->tcl_ZlibStreamAdler32) /* 617 */
+#endif
+#ifndef Tcl_ZlibStreamPut
+#define Tcl_ZlibStreamPut \
+ (tclStubsPtr->tcl_ZlibStreamPut) /* 618 */
+#endif
+#ifndef Tcl_ZlibStreamGet
+#define Tcl_ZlibStreamGet \
+ (tclStubsPtr->tcl_ZlibStreamGet) /* 619 */
+#endif
+#ifndef Tcl_ZlibStreamClose
+#define Tcl_ZlibStreamClose \
+ (tclStubsPtr->tcl_ZlibStreamClose) /* 620 */
+#endif
+#ifndef Tcl_ZlibStreamReset
+#define Tcl_ZlibStreamReset \
+ (tclStubsPtr->tcl_ZlibStreamReset) /* 621 */
+#endif
#endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c
index b5ea1b6..d953edf 100644
--- a/generic/tclStubInit.c
+++ b/generic/tclStubInit.c
@@ -8,7 +8,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclStubInit.c,v 1.172 2008/12/09 21:47:08 nijtmans Exp $
+ * RCS: @(#) $Id: tclStubInit.c,v 1.173 2008/12/11 14:17:23 dkf Exp $
*/
#include "tclInt.h"
@@ -1135,6 +1135,18 @@ static const TclStubs tclStubs = {
Tcl_TransferResult, /* 607 */
Tcl_InterpActive, /* 608 */
Tcl_BackgroundException, /* 609 */
+ Tcl_ZlibDeflate, /* 610 */
+ Tcl_ZlibInflate, /* 611 */
+ Tcl_ZlibCRC32, /* 612 */
+ Tcl_ZlibAdler32, /* 613 */
+ Tcl_ZlibStreamInit, /* 614 */
+ Tcl_ZlibStreamGetCommandName, /* 615 */
+ Tcl_ZlibStreamEof, /* 616 */
+ Tcl_ZlibStreamAdler32, /* 617 */
+ Tcl_ZlibStreamPut, /* 618 */
+ Tcl_ZlibStreamGet, /* 619 */
+ Tcl_ZlibStreamClose, /* 620 */
+ Tcl_ZlibStreamReset, /* 621 */
};
/* !END!: Do not edit above this line. */