diff options
| author | bch <brad.harder@gmail.com> | 2020-11-26 00:38:21 (GMT) |
|---|---|---|
| committer | bch <brad.harder@gmail.com> | 2020-11-26 00:38:21 (GMT) |
| commit | e6d3b1557cc89901800f050c7a8fcc5fe20c99ab (patch) | |
| tree | f7273476381f5f36c3cd74264be971019baa4551 | |
| parent | da7ec341ce01a8f3499ecb556c739ef4dfa9c6e4 (diff) | |
| download | tcl-e6d3b1557cc89901800f050c7a8fcc5fe20c99ab.zip tcl-e6d3b1557cc89901800f050c7a8fcc5fe20c99ab.tar.gz tcl-e6d3b1557cc89901800f050c7a8fcc5fe20c99ab.tar.bz2 | |
silence warning re: sign-compare
| -rw-r--r-- | generic/tclInt.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 3a759ca..92945ca 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -4854,7 +4854,7 @@ MODULE_SCOPE Tcl_PackageInitProc Procbodytest_SafeInit; (objPtr) = Tcl_NewWideIntObj(w) #define TclNewIndexObj(objPtr, w) \ - (objPtr) = ((w) == TCL_INDEX_NONE) ? Tcl_NewWideIntObj(-1) : Tcl_NewWideIntObj(w) + (objPtr) = (((size_t)w) == TCL_INDEX_NONE) ? Tcl_NewWideIntObj(-1) : Tcl_NewWideIntObj(w) #define TclNewDoubleObj(objPtr, d) \ (objPtr) = Tcl_NewDoubleObj(d) |