diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-02-27 08:34:05 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-02-27 08:34:05 (GMT) |
commit | f04b875d88bbe9cd4d2114d60c194be01a7c9e04 (patch) | |
tree | 34dde540a1ed936003a721aec62cf6ede6e5bfa2 /generic/tclIndexObj.c | |
parent | 4fdbe79875a43efd9f42e75ccf256884f657dac3 (diff) | |
download | tcl-f04b875d88bbe9cd4d2114d60c194be01a7c9e04.zip tcl-f04b875d88bbe9cd4d2114d60c194be01a7c9e04.tar.gz tcl-f04b875d88bbe9cd4d2114d60c194be01a7c9e04.tar.bz2 |
More use of (efficient) TclHasIntRep() macro. Also eliminate many (size_t) and (unsigned) type-casts, which don't make sense any more.
Diffstat (limited to 'generic/tclIndexObj.c')
-rw-r--r-- | generic/tclIndexObj.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/generic/tclIndexObj.c b/generic/tclIndexObj.c index 965ec24..e2be3aa 100644 --- a/generic/tclIndexObj.c +++ b/generic/tclIndexObj.c @@ -978,8 +978,7 @@ Tcl_WrongNumArgs( len = TclScanElement(elementStr, elemLen, &flags); if (MAY_QUOTE_WORD && len != elemLen) { - char *quotedElementStr = TclStackAlloc(interp, - (unsigned)len + 1); + char *quotedElementStr = TclStackAlloc(interp, len + 1); len = TclConvertElement(elementStr, elemLen, quotedElementStr, flags); @@ -1030,8 +1029,7 @@ Tcl_WrongNumArgs( len = TclScanElement(elementStr, elemLen, &flags); if (MAY_QUOTE_WORD && len != elemLen) { - char *quotedElementStr = TclStackAlloc(interp, - (unsigned) len + 1); + char *quotedElementStr = TclStackAlloc(interp, len + 1); len = TclConvertElement(elementStr, elemLen, quotedElementStr, flags); |