diff options
| author | hobbs <hobbs@noemail.net> | 2000-04-21 04:04:11 (GMT) |
|---|---|---|
| committer | hobbs <hobbs@noemail.net> | 2000-04-21 04:04:11 (GMT) |
| commit | 8b72332f1a154398ee2d50b4dbf07f91e109c674 (patch) | |
| tree | 11023b429351420787329586c2acb1e3756ea64f /generic/tclAlloc.c | |
| parent | a10461dd388abea9a0e4f6fbdc45664f582368ff (diff) | |
| download | tcl-8b72332f1a154398ee2d50b4dbf07f91e109c674.zip tcl-8b72332f1a154398ee2d50b4dbf07f91e109c674.tar.gz tcl-8b72332f1a154398ee2d50b4dbf07f91e109c674.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]
FossilOrigin-Name: 618011d0b22f7d1d6ad7a5e0ae9caa838f721e89
Diffstat (limited to 'generic/tclAlloc.c')
| -rw-r--r-- | generic/tclAlloc.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/generic/tclAlloc.c b/generic/tclAlloc.c index 0b9bace..cbeadda 100644 --- a/generic/tclAlloc.c +++ b/generic/tclAlloc.c @@ -15,7 +15,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclAlloc.c,v 1.8 1999/08/10 17:35:18 redman Exp $ + * RCS: @(#) $Id: tclAlloc.c,v 1.9 2000/04/21 04:04:12 hobbs Exp $ */ #include "tclInt.h" @@ -29,7 +29,12 @@ # define RCHECK #endif +/* + * On Unix this will already be defined + */ +#if defined(WIN32) || defined(MAC_TCL) typedef unsigned long caddr_t; +#endif /* * The overhead on a block is at least 8 bytes. When free, this space |