summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2004-09-29 22:22:50 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2004-09-29 22:22:50 (GMT)
commite6f98a12349b67e26d5f330d01ab742b40027f63 (patch)
tree41b33572d69ad3e240ece485795e46ea909b60da /generic
parent1d5b0da0c8f65eeca48341adca32a96a8774f84a (diff)
downloadtcl-e6f98a12349b67e26d5f330d01ab742b40027f63.zip
tcl-e6f98a12349b67e26d5f330d01ab742b40027f63.tar.gz
tcl-e6f98a12349b67e26d5f330d01ab742b40027f63.tar.bz2
Typo
Diffstat (limited to 'generic')
-rw-r--r--generic/tclObj.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclObj.c b/generic/tclObj.c
index 107fb59..8f1fa5e 100644
--- a/generic/tclObj.c
+++ b/generic/tclObj.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclObj.c,v 1.69 2004/09/29 22:17:30 dkf Exp $
+ * RCS: @(#) $Id: tclObj.c,v 1.70 2004/09/29 22:22:50 dkf Exp $
*/
#include "tclInt.h"
@@ -3467,7 +3467,7 @@ SetCmdNameFromAny(interp, objPtr)
* structure was found, leave NULL as the cached value.
*/
- TclFreeIntRep)(objPtr);
+ TclFreeIntRep(objPtr);
objPtr->internalRep.twoPtrValue.ptr1 = (VOID *) resPtr;
objPtr->internalRep.twoPtrValue.ptr2 = NULL;
objPtr->typePtr = &tclCmdNameType;