summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authoravl <avl>2017-03-05 15:05:48 (GMT)
committeravl <avl>2017-03-05 15:05:48 (GMT)
commit08192ab42f794f6a486fdc21a537cce794f04472 (patch)
tree28a3c3a3d6d64830f1df23611f7ead6521f8f9a0 /generic
parent838c36a45d377ef799dd45158832040a6a528d91 (diff)
downloadtcl-08192ab42f794f6a486fdc21a537cce794f04472.zip
tcl-08192ab42f794f6a486fdc21a537cce794f04472.tar.gz
tcl-08192ab42f794f6a486fdc21a537cce794f04472.tar.bz2
Fix for Ticket [71c0878b71] + test cases
Diffstat (limited to 'generic')
-rw-r--r--generic/tclStrToD.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index 77e1839..224ab45 100644
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -539,7 +539,7 @@ TclParseNumber(
*/
if (bytes == NULL) {
- if (endPtrPtr == NULL) {
+ if (interp == NULL && endPtrPtr == NULL) {
if (objPtr->typePtr == &tclDictType) {
/* A dict can never be a (single) number */
return TCL_ERROR;