diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-22 09:05:10 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-22 09:05:10 (GMT) |
| commit | c829651d80705243c9ea3665699f13ad901debbe (patch) | |
| tree | 097c4f17dd9552e1885621bf55d74a3f61a8ace8 /generic | |
| parent | 349c1fd2676793625cc0037a11d5989b0a591397 (diff) | |
| download | tcl-c829651d80705243c9ea3665699f13ad901debbe.zip tcl-c829651d80705243c9ea3665699f13ad901debbe.tar.gz tcl-c829651d80705243c9ea3665699f13ad901debbe.tar.bz2 | |
Fix signed-unsigned-compare warning (reported by François Vogel on Windows, but gcc can trigger it as well)
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclCompExpr.c | 2 | ||||
| -rw-r--r-- | generic/tclEnsemble.c | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCompExpr.c b/generic/tclCompExpr.c index 50edbec..2ffcc68 100644 --- a/generic/tclCompExpr.c +++ b/generic/tclCompExpr.c @@ -666,7 +666,7 @@ ParseExpr( OpNode *newPtr = NULL; do { - if (size <= UINT_MAX/sizeof(OpNode)) { + if (size <= (int)(UINT_MAX/sizeof(OpNode))) { newPtr = attemptckrealloc(nodes, size * sizeof(OpNode)); } } while ((newPtr == NULL) diff --git a/generic/tclEnsemble.c b/generic/tclEnsemble.c index 986a553..6b6a156 100644 --- a/generic/tclEnsemble.c +++ b/generic/tclEnsemble.c @@ -3081,7 +3081,7 @@ TclAttemptCompileProc( int result, i; Tcl_Token *saveTokenPtr = parsePtr->tokenPtr; int savedStackDepth = envPtr->currStackDepth; - unsigned savedCodeNext = envPtr->codeNext - envPtr->codeStart; + int savedCodeNext = envPtr->codeNext - envPtr->codeStart; int savedAuxDataArrayNext = envPtr->auxDataArrayNext; int savedExceptArrayNext = envPtr->exceptArrayNext; #ifdef TCL_COMPILE_DEBUG |