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 | dfe9963d735b0e1754db2e270b91e3c45ece3636 (patch) | |
| tree | 5e0b144f0f7909747fe8bf9695f18e5e1e6880f4 | |
| parent | cd2d193b742daad9a3d56ddfc84cf9f4398825a3 (diff) | |
| download | tcl-dfe9963d735b0e1754db2e270b91e3c45ece3636.zip tcl-dfe9963d735b0e1754db2e270b91e3c45ece3636.tar.gz tcl-dfe9963d735b0e1754db2e270b91e3c45ece3636.tar.bz2 | |
Use standard macro for freeing the internal rep
| -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; |