diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2024-04-10 13:03:29 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2024-04-10 13:03:29 (GMT) |
commit | e19ead5a14be4a7a9dcdc09265af1fd72d151be3 (patch) | |
tree | e4a95d84f090a75d3168ffd7a06cf7eacbcf9232 /generic/tclClockFmt.c | |
parent | 8967992c36d0c455f00aa56a28a1163028443ada (diff) | |
parent | c6f08c66238f7dbef5ef9094ef50fe5f4487217a (diff) | |
download | tcl-e19ead5a14be4a7a9dcdc09265af1fd72d151be3.zip tcl-e19ead5a14be4a7a9dcdc09265af1fd72d151be3.tar.gz tcl-e19ead5a14be4a7a9dcdc09265af1fd72d151be3.tar.bz2 |
Merge 8.7
Diffstat (limited to 'generic/tclClockFmt.c')
-rw-r--r-- | generic/tclClockFmt.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclClockFmt.c b/generic/tclClockFmt.c index f428b21..f3b1bad 100644 --- a/generic/tclClockFmt.c +++ b/generic/tclClockFmt.c @@ -670,8 +670,7 @@ ClockFmtObj_SetFromAny( (void)TclGetString(objPtr); /* free old internal representation */ - if (objPtr->typePtr && objPtr->typePtr->freeIntRepProc) - objPtr->typePtr->freeIntRepProc(objPtr); + TclFreeInternalRep(objPtr); /* initial state of format object */ ObjClockFmtScn(objPtr) = NULL; |