diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-13 09:45:57 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-03-13 09:45:57 (GMT) |
| commit | 4a42ca1d7eda9697c6f63c27673e09de3df775fd (patch) | |
| tree | f139c8175f4a5b8428a0ae29570be55f28d47480 /generic/tclStrToD.c | |
| parent | de5b01842a077b2b1c57f8836b7afb6d901267be (diff) | |
| download | tcl-4a42ca1d7eda9697c6f63c27673e09de3df775fd.zip tcl-4a42ca1d7eda9697c6f63c27673e09de3df775fd.tar.gz tcl-4a42ca1d7eda9697c6f63c27673e09de3df775fd.tar.bz2 | |
Restore TclListObjLength()/TclListObjGetElements() macro's, as they were in 8.6
Diffstat (limited to 'generic/tclStrToD.c')
| -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 f23b23b..09fd1f3 100644 --- a/generic/tclStrToD.c +++ b/generic/tclStrToD.c @@ -557,7 +557,7 @@ TclParseNumber( if (TclHasInternalRep(objPtr, &tclListType)) { int length; /* A list can only be a (single) number if its length == 1 */ - TclListObjLengthM(NULL, objPtr, &length); + TclListObjLength(NULL, objPtr, &length); if (length != 1) { return TCL_ERROR; } |