diff options
Diffstat (limited to 'generic/tclObj.c')
| -rw-r--r-- | generic/tclObj.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/generic/tclObj.c b/generic/tclObj.c index b02279e..731196f 100644 --- a/generic/tclObj.c +++ b/generic/tclObj.c @@ -1667,12 +1667,18 @@ int SetDuplicatePureObj( * * Perhaps in the future this can be remedied and this special treatment * removed. + * + * Similar problem with the integer (0x0A vs 10), double (1e-1 vs 0.1) and + * index types ("coord" vs "coords", see bug [a34733451b]) */ if (bytes && (dupPtr->typePtr == NULL || dupPtr->typePtr->updateStringProc == NULL || typePtr == &tclUniCharStringType + || typePtr == &tclDoubleType + || typePtr == &tclIntType + || typePtr == &tclIndexType ) ) { if (!TclAttemptInitStringRep(dupPtr, bytes, objPtr->length)) { |