diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-10-06 19:20:43 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-10-06 19:20:43 (GMT) |
| commit | 99e9ce3656f195c60ba4e928559c05d47167901c (patch) | |
| tree | 64fba30ebef34869f49fcdf5b36b3b41164698db /generic/tclCompExpr.c | |
| parent | d84d03b91a4eb72f88b56011713706a6f36bc17c (diff) | |
| download | tcl-99e9ce3656f195c60ba4e928559c05d47167901c.zip tcl-99e9ce3656f195c60ba4e928559c05d47167901c.tar.gz tcl-99e9ce3656f195c60ba4e928559c05d47167901c.tar.bz2 | |
Use more TCL_AUTO_LENGTH, when appropriate
Diffstat (limited to 'generic/tclCompExpr.c')
| -rw-r--r-- | generic/tclCompExpr.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCompExpr.c b/generic/tclCompExpr.c index 2950087..7afb0e0 100644 --- a/generic/tclCompExpr.c +++ b/generic/tclCompExpr.c @@ -1819,7 +1819,7 @@ int Tcl_ParseExpr( Tcl_Interp *interp, /* Used for error reporting. */ const char *start, /* Start of source string to parse. */ - size_t numBytes, /* Number of bytes in string. If (size_t)-1, the + size_t numBytes, /* Number of bytes in string. If -1, the * string consists of all bytes up to the * first null character. */ Tcl_Parse *parsePtr) /* Structure to fill with information about @@ -1833,7 +1833,7 @@ Tcl_ParseExpr( Tcl_Parse *exprParsePtr = TclStackAlloc(interp, sizeof(Tcl_Parse)); /* Holds the Tcl_Tokens of substitutions. */ - if (numBytes == (size_t)-1) { + if (numBytes == TCL_AUTO_LENGTH) { numBytes = (start ? strlen(start) : 0); } |