diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-17 09:27:44 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-17 09:27:44 (GMT) |
| commit | bc10bf6d03a6c8685c64e36a6095e289e2b1ef33 (patch) | |
| tree | d560f690b9bdd6294623904e6273d37b937a872e /generic | |
| parent | 32975bd346263a3ab1f6bcf46adadfdddd3ffe03 (diff) | |
| parent | e14285c3a1d7dd2d7407fda5a5c841ccb5cae488 (diff) | |
| download | tcl-bc10bf6d03a6c8685c64e36a6095e289e2b1ef33.zip tcl-bc10bf6d03a6c8685c64e36a6095e289e2b1ef33.tar.gz tcl-bc10bf6d03a6c8685c64e36a6095e289e2b1ef33.tar.bz2 | |
Change version number of http package from 2.9.5 -> 2.10.0a1, since it's different from the 2.9.5 version in Tcl 8.6.x.
Use "$idx >= 0" check in stead of "$idx > -1" everywhere.
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclDisassemble.c | 4 | ||||
| -rw-r--r-- | generic/tclZlib.c | 12 |
2 files changed, 8 insertions, 8 deletions
diff --git a/generic/tclDisassemble.c b/generic/tclDisassemble.c index 379b427..e066adf 100644 --- a/generic/tclDisassemble.c +++ b/generic/tclDisassemble.c @@ -284,7 +284,7 @@ DisassembleByteCodeObj( PrintSourceToObj(bufferObj, codePtr->source, TclMin(codePtr->numSrcBytes, 55)); GetLocationInformation(codePtr->procPtr, &fileObj, &line); - if (line > -1 && fileObj != NULL) { + if (line >= 0 && fileObj != NULL) { Tcl_AppendPrintfToObj(bufferObj, "\n File \"%s\" Line %d", Tcl_GetString(fileObj), line); } @@ -1237,7 +1237,7 @@ DisassembleByteCodeAsDicts( Tcl_NewIntObj(codePtr->maxStackDepth)); Tcl_DictObjPut(NULL, description, Tcl_NewStringObj("exceptdepth", -1), Tcl_NewIntObj(codePtr->maxExceptDepth)); - if (line > -1) { + if (line >= 0) { Tcl_DictObjPut(NULL, description, Tcl_NewStringObj("initiallinenumber", -1), Tcl_NewIntObj(line)); diff --git a/generic/tclZlib.c b/generic/tclZlib.c index e70c4b3..f4cfb07 100644 --- a/generic/tclZlib.c +++ b/generic/tclZlib.c @@ -2703,21 +2703,21 @@ ZlibStreamAddCmd( switch ((enum addOptions) index) { case ao_flush: /* -flush */ - if (flush > -1) { + if (flush >= 0) { flush = -2; } else { flush = Z_SYNC_FLUSH; } break; case ao_fullflush: /* -fullflush */ - if (flush > -1) { + if (flush >= 0) { flush = -2; } else { flush = Z_FULL_FLUSH; } break; case ao_finalize: /* -finalize */ - if (flush > -1) { + if (flush >= 0) { flush = -2; } else { flush = Z_FINISH; @@ -2830,21 +2830,21 @@ ZlibStreamPutCmd( switch ((enum putOptions) index) { case po_flush: /* -flush */ - if (flush > -1) { + if (flush >= 0) { flush = -2; } else { flush = Z_SYNC_FLUSH; } break; case po_fullflush: /* -fullflush */ - if (flush > -1) { + if (flush >= 0) { flush = -2; } else { flush = Z_FULL_FLUSH; } break; case po_finalize: /* -finalize */ - if (flush > -1) { + if (flush >= 0) { flush = -2; } else { flush = Z_FINISH; |