diff options
author | hobbs <hobbs> | 2000-04-21 04:04:12 (GMT) |
---|---|---|
committer | hobbs <hobbs> | 2000-04-21 04:04:12 (GMT) |
commit | bdf4ab31796aad0cbfc4b0f02a8e84a23229ad2d (patch) | |
tree | 11023b429351420787329586c2acb1e3756ea64f /unix | |
parent | 4e8cc6920798eaa803c47afc4e599cb680d2b459 (diff) | |
download | tcl-bdf4ab31796aad0cbfc4b0f02a8e84a23229ad2d.zip tcl-bdf4ab31796aad0cbfc4b0f02a8e84a23229ad2d.tar.gz tcl-bdf4ab31796aad0cbfc4b0f02a8e84a23229ad2d.tar.bz2 |
* generic/tclAlloc.c: wrapped caddr_t define to not be done on Unix
* unix/tclUnixPort.h: added Tclp*Alloc defines to allow the use of
USE_TCLALLOC on Unix. [Bug: 4731]
Diffstat (limited to 'unix')
-rw-r--r-- | unix/tclUnixPort.h | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/unix/tclUnixPort.h b/unix/tclUnixPort.h index fa6333a..cb3c777 100644 --- a/unix/tclUnixPort.h +++ b/unix/tclUnixPort.h @@ -19,7 +19,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixPort.h,v 1.14 2000/04/19 08:32:46 hobbs Exp $ + * RCS: @(#) $Id: tclUnixPort.h,v 1.15 2000/04/21 04:04:12 hobbs Exp $ */ #ifndef _TCLUNIXPORT @@ -462,6 +462,17 @@ extern double strtod(); #define TclpReleaseFile(file) /* Nothing. */ /* + * The following defines wrap the system memory allocation routines for + * use by tclAlloc.c. By default off unused on Unix. + */ + +#if USE_TCLALLOC +# define TclpSysAlloc(size, isBin) malloc((size_t)size) +# define TclpSysFree(ptr) free((char*)ptr) +# define TclpSysRealloc(ptr, size) realloc((char*)ptr, (size_t)size) +#endif + +/* * The following macros and declaration wrap the C runtime library * functions. */ |