diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-02-03 14:53:27 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-02-03 14:53:27 (GMT) |
commit | f014d9dec02af9ac34f9ab19ed83c3301fdf705e (patch) | |
tree | 464fb81e85b4bf60cc2c9994d122e27b0243cd7b | |
parent | 97946f45bda4b796e0ea363f910469702a37132b (diff) | |
parent | f3ca0e45dc4faf67ceb9d9cab12b06ca7ed60a6b (diff) | |
download | tcl-jn_emptystring.zip tcl-jn_emptystring.tar.gz tcl-jn_emptystring.tar.bz2 |
Merge trunk. Don't use ListObjLength() in tclStrToD.cjn_emptystring
-rw-r--r-- | generic/tclStrToD.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c index 20fec58..ed2e80f 100644 --- a/generic/tclStrToD.c +++ b/generic/tclStrToD.c @@ -553,7 +553,7 @@ TclParseNumber( if (objPtr->typePtr == &tclListType) { int length; /* A list can only be a (single) number if its length == 1 */ - ListObjLength(objPtr, length); + TclListObjLength(NULL, objPtr, &length); if (length != 1) { return TCL_ERROR; } |