diff options
author | nijtmans <nijtmans@noemail.net> | 2009-02-27 23:03:40 (GMT) |
---|---|---|
committer | nijtmans <nijtmans@noemail.net> | 2009-02-27 23:03:40 (GMT) |
commit | 838130b04943599c15afeec2735f93bf0e484a9f (patch) | |
tree | c82e642d20ce6b9934198c2c1059f1892d825390 /generic/tclCkalloc.c | |
parent | 4d9f677c8ad022324d66a4708b7e0a6f3e688ab5 (diff) | |
download | tcl-838130b04943599c15afeec2735f93bf0e484a9f.zip tcl-838130b04943599c15afeec2735f93bf0e484a9f.tar.gz tcl-838130b04943599c15afeec2735f93bf0e484a9f.tar.bz2 |
[Bug 218977] Tcl_DbCkfree needs a return value
don't use CONST84/CONST86 in internal header files
FossilOrigin-Name: 23ff81a854460293945f523c9ac352f6ab8aedc7
Diffstat (limited to 'generic/tclCkalloc.c')
-rw-r--r-- | generic/tclCkalloc.c | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/generic/tclCkalloc.c b/generic/tclCkalloc.c index fa7d376..2cbff69 100644 --- a/generic/tclCkalloc.c +++ b/generic/tclCkalloc.c @@ -14,7 +14,7 @@ * * This code contributed by Karl Lehenbauer and Mark Diekhans * - * RCS: @(#) $Id: tclCkalloc.c,v 1.34 2009/01/09 11:21:45 dkf Exp $ + * RCS: @(#) $Id: tclCkalloc.c,v 1.35 2009/02/27 23:03:41 nijtmans Exp $ */ #include "tclInt.h" @@ -569,7 +569,7 @@ Tcl_AttemptDbCkalloc( *---------------------------------------------------------------------- */ -int +void Tcl_DbCkfree( char *ptr, const char *file, @@ -578,7 +578,7 @@ Tcl_DbCkfree( struct mem_header *memp; if (ptr == NULL) { - return 0; + return; } /* @@ -632,8 +632,6 @@ Tcl_DbCkfree( } TclpFree((char *) memp); Tcl_MutexUnlock(ckallocMutexPtr); - - return 0; } /* @@ -1182,14 +1180,13 @@ Tcl_Free( TclpFree(ptr); } -int +void Tcl_DbCkfree( char *ptr, const char *file, int line) { TclpFree(ptr); - return 0; } /* |