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 | c6f08c66238f7dbef5ef9094ef50fe5f4487217a (patch) | |
| tree | 5e0b144f0f7909747fe8bf9695f18e5e1e6880f4 | |
| parent | 5f873c0783342767b38a977bf2e3ebd8eb23f19f (diff) | |
| download | tcl-c6f08c66238f7dbef5ef9094ef50fe5f4487217a.zip tcl-c6f08c66238f7dbef5ef9094ef50fe5f4487217a.tar.gz tcl-c6f08c66238f7dbef5ef9094ef50fe5f4487217a.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; |