diff options
Diffstat (limited to 'generic/tcl.decls')
| -rw-r--r-- | generic/tcl.decls | 53 |
1 files changed, 50 insertions, 3 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index 9bf31ff..8f6a438 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -12,7 +12,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: tcl.decls,v 1.158 2008/12/09 20:16:29 dgp Exp $ +# RCS: @(#) $Id: tcl.decls,v 1.159 2008/12/11 01:21:52 dkf Exp $ library tcl @@ -2198,7 +2198,7 @@ declare 604 generic { int *objcPtr, Tcl_Obj *const *objv, Tcl_Obj ***remObjv) } -# TIP 336 (manipulate the error line) +# TIP#336 (manipulate the error line) declare 605 generic { int Tcl_GetErrorLine(Tcl_Interp *interp) } @@ -2217,11 +2217,54 @@ declare 608 generic { int Tcl_InterpActive(Tcl_Interp *interp) } -# TIP 337 +# TIP#337 (log exception for background processing) declare 609 generic { void Tcl_BackgroundException(Tcl_Interp *interp, int code) } +# TIP#234 (zlib interface) +declare 610 generic { + int Tcl_ZlibDeflate(Tcl_Interp *interp, int format, Tcl_Obj *data, + int level); +} +declare 611 generic { + int Tcl_ZlibInflate(Tcl_Interp *interp, int format, Tcl_Obj *data, + int buffersize); +} +declare 612 generic { + unsigned int Tcl_ZlibCRC32(unsigned int crc, const char *buf, + unsigned int len); +} +declare 613 generic { + unsigned int Tcl_ZlibAdler32(unsigned int adler, const char *buf, + unsigned int len); +} +declare 614 generic { + int Tcl_ZlibStreamInit(Tcl_Interp *interp, int mode, int format, + int level, Tcl_ZlibStream *zshandle); +} +declare 615 generic { + Tcl_Obj *Tcl_ZlibStreamGetCommandName(Tcl_ZlibStream zshandle); +} +declare 616 generic { + int Tcl_ZlibStreamEof(Tcl_ZlibStream zshandle); +} +declare 617 generic { + int Tcl_ZlibStreamAdler32(Tcl_ZlibStream zshandle); +} +declare 618 generic { + int Tcl_ZlibStreamPut(Tcl_ZlibStream zshandle, Tcl_Obj *data, int flush); +} +declare 619 generic { + int Tcl_ZlibStreamGet(Tcl_ZlibStream zshandle, Tcl_Obj *data, int count); +} +declare 620 generic { + int Tcl_ZlibStreamClose(Tcl_ZlibStream zshandle); +} +declare 621 generic { + int Tcl_ZlibStreamReset(Tcl_ZlibStream zshandle); +} + ############################################################################## # Define the platform specific public Tcl interface. These functions are only @@ -2274,3 +2317,7 @@ export { export { void Tcl_GetMemoryInfo(Tcl_DString *dsPtr) } + +# Local Variables: +# mode: tcl +# End: |