diff options
| author | dgp <dgp@users.sourceforge.net> | 2007-04-02 18:48:01 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2007-04-02 18:48:01 (GMT) |
| commit | fa49c9af9b48554cf441f2554c9cd58d3ca1f267 (patch) | |
| tree | 533f6091f7eb9bb16881b234e206e374e57eb34f /generic/tclExecute.c | |
| parent | 662bbb37a4d2552ae0f59545f527731d80a47d3c (diff) | |
| download | tcl-fa49c9af9b48554cf441f2554c9cd58d3ca1f267.zip tcl-fa49c9af9b48554cf441f2554c9cd58d3ca1f267.tar.gz tcl-fa49c9af9b48554cf441f2554c9cd58d3ca1f267.tar.bz2 | |
* generic/tclBasic.c: Replace arrays on the C stack and ckalloc
* generic/tclExecute.c: calls with TclStackAlloc calls to use memory
* generic/tclFCmd.c: on Tcl's evaluation stack.
* generic/tclFileName.c:
* generic/tclIOCmd.c:
* generic/tclIndexObj.c:
* generic/tclInterp.c:
* generic/tclNamesp.c:
* generic/tclTrace.c:
* unix/tclUnixPipe.c:
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index fd3fb34..7e4148e 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclExecute.c,v 1.266 2007/04/01 00:32:27 dkf Exp $ + * RCS: @(#) $Id: tclExecute.c,v 1.267 2007/04/02 18:48:03 dgp Exp $ */ #include "tclInt.h" @@ -115,7 +115,6 @@ static char *resultStrings[] = { #ifdef TCL_COMPILE_STATS long tclObjsAlloced = 0; long tclObjsFreed = 0; -#define TCL_MAX_SHARED_OBJ_STATS 5 long tclObjsShared[TCL_MAX_SHARED_OBJ_STATS] = { 0, 0, 0, 0, 0 }; #endif /* TCL_COMPILE_STATS */ |