diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-05-28 12:38:44 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-05-28 12:38:44 (GMT) |
| commit | 2356a95cada8ca1dff56b2d430a26e515f40245f (patch) | |
| tree | 5f92f698a302365fe77b6414c1dc9fe29b743df1 /generic/tclZlib.c | |
| parent | 34acc36d873d6b1ec6a8cd505af4491dfad7fd57 (diff) | |
| download | tcl-2356a95cada8ca1dff56b2d430a26e515f40245f.zip tcl-2356a95cada8ca1dff56b2d430a26e515f40245f.tar.gz tcl-2356a95cada8ca1dff56b2d430a26e515f40245f.tar.bz2 | |
Make TclGlob() a static function. Sentinel/indenting/comment improvements (all backported from 8.7)
Diffstat (limited to 'generic/tclZlib.c')
| -rw-r--r-- | generic/tclZlib.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclZlib.c b/generic/tclZlib.c index e043212..0ecc0cf 100644 --- a/generic/tclZlib.c +++ b/generic/tclZlib.c @@ -1980,7 +1980,7 @@ ZlibCmd( start = Tcl_ZlibAdler32(0, NULL, 0); } data = Tcl_GetByteArrayFromObj(objv[2], &dlen); - Tcl_SetObjResult(interp, Tcl_NewWideIntObj((Tcl_WideInt) + Tcl_SetObjResult(interp, Tcl_NewWideIntObj( (uLong) Tcl_ZlibAdler32(start, data, dlen))); return TCL_OK; case CMD_CRC: /* crc32 str ?startvalue? @@ -1997,7 +1997,7 @@ ZlibCmd( start = Tcl_ZlibCRC32(0, NULL, 0); } data = Tcl_GetByteArrayFromObj(objv[2], &dlen); - Tcl_SetObjResult(interp, Tcl_NewWideIntObj((Tcl_WideInt) + Tcl_SetObjResult(interp, Tcl_NewWideIntObj( (uLong) Tcl_ZlibCRC32(start, data, dlen))); return TCL_OK; case CMD_DEFLATE: /* deflate data ?level? @@ -2643,7 +2643,7 @@ ZlibStreamCmd( Tcl_WrongNumArgs(interp, 2, objv, NULL); return TCL_ERROR; } - Tcl_SetObjResult(interp, Tcl_NewWideIntObj((Tcl_WideInt) + Tcl_SetObjResult(interp, Tcl_NewWideIntObj( (uLong) Tcl_ZlibStreamChecksum(zstream))); return TCL_OK; case zs_reset: /* $strm reset */ |