diff options
| author | jingham <jingham@noemail.net> | 1999-08-16 00:09:17 (GMT) |
|---|---|---|
| committer | jingham <jingham@noemail.net> | 1999-08-16 00:09:17 (GMT) |
| commit | d04bd3e5567458e41e332cdc7cfb0692ae6edab2 (patch) | |
| tree | cb1dc76862130925c7ff862775fad46e8da3514b /mac/tclMacInt.h | |
| parent | 4db88637c9e01c7f9eaaf3508b217d43c6647f06 (diff) | |
| download | tcl-d04bd3e5567458e41e332cdc7cfb0692ae6edab2.zip tcl-d04bd3e5567458e41e332cdc7cfb0692ae6edab2.tar.gz tcl-d04bd3e5567458e41e332cdc7cfb0692ae6edab2.tar.bz2 | |
If you are running the testsuite, set the Stack size to 768K so you can pass the regexp tests. For most sane regexps, however 512K is fine.
FossilOrigin-Name: f8e83859fc77f54787856f1d17b53216fd9312e6
Diffstat (limited to 'mac/tclMacInt.h')
| -rw-r--r-- | mac/tclMacInt.h | 19 |
1 files changed, 16 insertions, 3 deletions
diff --git a/mac/tclMacInt.h b/mac/tclMacInt.h index 9e94e61..77d274c 100644 --- a/mac/tclMacInt.h +++ b/mac/tclMacInt.h @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclMacInt.h,v 1.5 1999/05/11 07:12:19 jingham Exp $ + * RCS: @(#) $Id: tclMacInt.h,v 1.6 1999/08/16 00:09:18 jingham Exp $ */ #ifndef _TCLMACINT @@ -27,10 +27,23 @@ #pragma export on /* - * Defines to control stack behavior + * Defines to control stack behavior. + * + * The Tcl8.2 regexp code is highly recursive for patterns with many + * subexpressions. So we have to increase the stack space to accomodate. + * 512 K is good enough for ordinary work, but you need 768 to pass the Tcl + * regexp testsuite. + * + * For the PPC, you need to set the stack space in the Project file. + * */ -#define TCL_MAC_68K_STACK_GROWTH (256*1024) +#ifdef TCL_TEST +# define TCL_MAC_68K_STACK_GROWTH (768*1024) +#else +# define TCL_MAC_68K_STACK_GROWTH (512*1024) +#endif + #define TCL_MAC_STACK_THRESHOLD 16384 /* |