diff options
author | nijtmans <nijtmans> | 2009-07-22 12:00:42 (GMT) |
---|---|---|
committer | nijtmans <nijtmans> | 2009-07-22 12:00:42 (GMT) |
commit | 223b313a0cf97cf513b18df35a99f4c58cee7b39 (patch) | |
tree | 399c99f289130f071fbc6c96078f71c916910a90 /generic/tclLiteral.c | |
parent | 598551ed4987a7a3cd237cd8b66cf5becb3e8b1f (diff) | |
download | tcl-223b313a0cf97cf513b18df35a99f4c58cee7b39.zip tcl-223b313a0cf97cf513b18df35a99f4c58cee7b39.tar.gz tcl-223b313a0cf97cf513b18df35a99f4c58cee7b39.tar.bz2 |
* macosx/tclMacOSXFCmd.c: CONST -> const
* generic/tclGetDate.y:
* generic/tclDate.c:
* generic/tclLiteral.c: (char *) cast in ckfree call
Diffstat (limited to 'generic/tclLiteral.c')
-rw-r--r-- | generic/tclLiteral.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclLiteral.c b/generic/tclLiteral.c index ccee1c4..5d4974a 100644 --- a/generic/tclLiteral.c +++ b/generic/tclLiteral.c @@ -13,7 +13,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclLiteral.c,v 1.35 2009/02/10 22:49:50 nijtmans Exp $ + * RCS: @(#) $Id: tclLiteral.c,v 1.36 2009/07/22 12:00:42 nijtmans Exp $ */ #include "tclInt.h" @@ -282,7 +282,7 @@ TclCreateLiteral( *globalPtrPtr = globalPtr; } if (flags & LITERAL_ON_HEAP) { - ckfree(bytes); + ckfree((char *) bytes); } globalPtr->refCount++; return objPtr; @@ -290,7 +290,7 @@ TclCreateLiteral( } if (!newPtr) { if (flags & LITERAL_ON_HEAP) { - ckfree(bytes); + ckfree((char *) bytes); } return NULL; } @@ -438,7 +438,7 @@ TclRegisterLiteral( || ((objPtr->bytes[0] == bytes[0]) && (memcmp(objPtr->bytes, bytes, (unsigned) length) == 0)))) { if (flags & LITERAL_ON_HEAP) { - ckfree(bytes); + ckfree((char *) bytes); } objIndex = (localPtr - envPtr->literalArrayPtr); #ifdef TCL_COMPILE_DEBUG |