diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-02-08 16:11:09 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-02-08 16:11:09 (GMT) |
| commit | 58afe9245b6b5fdd7edeae0bbd2f469147364995 (patch) | |
| tree | 88fa51ccefb27f3562b0510e15204c56689ca002 | |
| parent | b2e7c5cfccde5d3011f0fadfb75156f17709f53b (diff) | |
| download | tcl-58afe9245b6b5fdd7edeae0bbd2f469147364995.zip tcl-58afe9245b6b5fdd7edeae0bbd2f469147364995.tar.gz tcl-58afe9245b6b5fdd7edeae0bbd2f469147364995.tar.bz2 | |
Fix gcc 13.2.1 (Fedora 39.1) warning: Writing of 1 byte into a region of size 0 [-Wstringop-overflow=]
| -rw-r--r-- | generic/tclObj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclObj.c b/generic/tclObj.c index 4abfa49..1b57e71 100644 --- a/generic/tclObj.c +++ b/generic/tclObj.c @@ -2009,7 +2009,7 @@ ParseBoolean( char lowerCase[6]; const char *str = TclGetStringFromObj(objPtr, &length); - if ((length == 0) || (length > 5)) { + if ((length < 1) || (length > 5)) { /* * Longest valid boolean string rep. is "false". */ |