diff options
| -rw-r--r-- | generic/tclTest.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 7db35e1..0af2d65 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -6984,7 +6984,7 @@ TestUtfNextCmd( bytes = Tcl_GetString(objv[1]); numBytes = objv[1]->length; - if (numBytes + 4 > sizeof(buffer)) { + if (numBytes + 4U > sizeof(buffer)) { Tcl_SetObjResult(interp, Tcl_ObjPrintf( "\"testutfnext\" can only handle %" TCL_Z_MODIFIER "u bytes", sizeof(buffer) - 4)); |