diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-07-02 19:39:34 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-07-02 19:39:34 (GMT) |
commit | 79f1d89388b7f8956b21b3f074ed61cf941bfef5 (patch) | |
tree | 2e6e4d5347aaf54008d46f6a19736a346ea766cf /generic/tclStrToD.c | |
parent | b8e604ca082e309711235f3230402d582ef5a7a9 (diff) | |
download | tcl-79f1d89388b7f8956b21b3f074ed61cf941bfef5.zip tcl-79f1d89388b7f8956b21b3f074ed61cf941bfef5.tar.gz tcl-79f1d89388b7f8956b21b3f074ed61cf941bfef5.tar.bz2 |
Use size_t in more API's, e.g. *RegExp* types
Diffstat (limited to 'generic/tclStrToD.c')
-rw-r--r-- | generic/tclStrToD.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c index 0c5f342..d7ce39c 100644 --- a/generic/tclStrToD.c +++ b/generic/tclStrToD.c @@ -474,7 +474,7 @@ TclParseNumber( * ("integer", "boolean value", etc.). */ const char *bytes, /* Pointer to the start of the string to * scan. */ - int numBytes, /* Maximum number of bytes to scan, see + size_t numBytes, /* Maximum number of bytes to scan, see * above. */ const char **endPtrPtr, /* Place to store pointer to the character * that terminated the scan. */ @@ -1111,7 +1111,7 @@ TclParseNumber( } } if (endPtrPtr == NULL) { - if ((len != 0) && ((numBytes > 0) || (*p != '\0'))) { + if ((len != 0) && ((numBytes + 1 > 1) || (*p != '\0'))) { status = TCL_ERROR; } } else { |