diff options
| author | nijtmans <nijtmans> | 2009-02-27 23:03:41 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2009-02-27 23:03:41 (GMT) |
| commit | 5119564c4202954fb6ad5bba77a1371f4a1d7920 (patch) | |
| tree | c82e642d20ce6b9934198c2c1059f1892d825390 /generic/tclCkalloc.c | |
| parent | cef4c16d5ab82ead5e327bd9a97a69f7e4b7e2c2 (diff) | |
| download | tcl-5119564c4202954fb6ad5bba77a1371f4a1d7920.zip tcl-5119564c4202954fb6ad5bba77a1371f4a1d7920.tar.gz tcl-5119564c4202954fb6ad5bba77a1371f4a1d7920.tar.bz2 | |
[Bug 218977] Tcl_DbCkfree needs a return value
don't use CONST84/CONST86 in internal header files
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; } /* |