diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2015-10-22 01:00:28 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2015-10-22 01:00:28 (GMT) |
| commit | ea342f5111aeaaf3b3da7e7e75df24f55a0f3e7d (patch) | |
| tree | bdfd154ba57a7d515d689228825d03b16f1d2bc8 | |
| parent | f82f46df1628c6703ad0ff2b94d83c6c9a46c56f (diff) | |
| download | tcl-ea342f5111aeaaf3b3da7e7e75df24f55a0f3e7d.zip tcl-ea342f5111aeaaf3b3da7e7e75df24f55a0f3e7d.tar.gz tcl-ea342f5111aeaaf3b3da7e7e75df24f55a0f3e7d.tar.bz2 | |
Turn off NRE asserts by default. About a 5% speedup on [clock format].
| -rw-r--r-- | generic/tclBasic.c | 3 | ||||
| -rw-r--r-- | generic/tclExecute.c | 3 | ||||
| -rw-r--r-- | generic/tclInt.h | 4 |
3 files changed, 3 insertions, 7 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index a09bf10..5c5bc64 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -22,10 +22,7 @@ #include "tclCompile.h" #include "tommath.h" #include <math.h> - -#if NRE_ENABLE_ASSERTS #include <assert.h> -#endif #define INTERP_STACK_INITIAL_SIZE 2000 #define CORO_STACK_INITIAL_SIZE 200 diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 7f65262..b10af65 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -20,10 +20,7 @@ #include "tclOOInt.h" #include "tommath.h" #include <math.h> - -#if NRE_ENABLE_ASSERTS #include <assert.h> -#endif /* * Hack to determine whether we may expect IEEE floating point. The hack is diff --git a/generic/tclInt.h b/generic/tclInt.h index d4baed4..50eb370 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -4799,7 +4799,9 @@ void Tcl_Panic(const char *, ...) __attribute__((analyzer_noreturn)); */ #define NRE_USE_SMALL_ALLOC 1 /* Only turn off for debugging purposes. */ -#define NRE_ENABLE_ASSERTS 1 +#ifndef NRE_ENABLE_ASSERTS +#define NRE_ENABLE_ASSERTS 0 +#endif /* * This is the main data struct for representing NR commands. It is designed |