diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2024-04-10 13:01:36 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2024-04-10 13:01:36 (GMT) |
| commit | d30a8fa3d452bd96dd59335d6f94e12310ef8e3e (patch) | |
| tree | 5e0b144f0f7909747fe8bf9695f18e5e1e6880f4 /generic/tclClockFmt.c | |
| parent | 19768f9f6ce6031c3b61b11dc8fd67013551dd62 (diff) | |
| download | tcl-d30a8fa3d452bd96dd59335d6f94e12310ef8e3e.zip tcl-d30a8fa3d452bd96dd59335d6f94e12310ef8e3e.tar.gz tcl-d30a8fa3d452bd96dd59335d6f94e12310ef8e3e.tar.bz2 | |
Use standard macro for freeing the internal rep
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 96b6db4..b9ce546 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; |