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 | 4ccfe4eda6b1f0c794b7a4a3e241c0e201232501 (patch) | |
| tree | e4a95d84f090a75d3168ffd7a06cf7eacbcf9232 /generic | |
| parent | 207f037c8218c66111b6c8b61cadf5d49be9a046 (diff) | |
| parent | dfe9963d735b0e1754db2e270b91e3c45ece3636 (diff) | |
| download | tcl-4ccfe4eda6b1f0c794b7a4a3e241c0e201232501.zip tcl-4ccfe4eda6b1f0c794b7a4a3e241c0e201232501.tar.gz tcl-4ccfe4eda6b1f0c794b7a4a3e241c0e201232501.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic')
| -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; |