aboutsummaryrefslogtreecommitdiffstats
path: root/src/lisp.h
diff options
context:
space:
mode:
authorKen Raeburn2000-03-30 22:27:55 +0000
committerKen Raeburn2000-03-30 22:27:55 +0000
commitc6129d7e86368baebd4df5d8a1a4ef2c844ae191 (patch)
treea571933291be249f765b7165d7404469e82cb12b /src/lisp.h
parent7438c86b33cdffaf44848fd367ecbf5838d05bac (diff)
downloademacs-c6129d7e86368baebd4df5d8a1a4ef2c844ae191.tar.gz
emacs-c6129d7e86368baebd4df5d8a1a4ef2c844ae191.zip
* lisp.h (NO_UNION_TYPE) [ENABLE_CHECKING]: Undef.
Diffstat (limited to 'src/lisp.h')
-rw-r--r--src/lisp.h16
1 files changed, 14 insertions, 2 deletions
diff --git a/src/lisp.h b/src/lisp.h
index 13e734a73ea..10749473be7 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -48,13 +48,25 @@ Boston, MA 02111-1307, USA. */
48 48
49/* Extra internal type checking? */ 49/* Extra internal type checking? */
50extern int suppress_checking; 50extern int suppress_checking;
51#ifdef ENABLE_CHECKING
52extern void die P_((const char *, const char *, int)); 51extern void die P_((const char *, const char *, int));
53#define CHECK(check,msg) ((check || suppress_checking ? 0 : die (msg, __FILE__, __LINE__)), 0) 52
53#ifdef ENABLE_CHECKING
54
55#define CHECK(check,msg) ((check || suppress_checking \
56 ? 0 \
57 : die (msg, __FILE__, __LINE__)), \
58 0)
59
60/* Let's get some compile-time checking too. */
61#undef NO_UNION_TYPE
62
54#else 63#else
64
55/* Produce same side effects and result, but don't complain. */ 65/* Produce same side effects and result, but don't complain. */
56#define CHECK(check,msg) ((check),0) 66#define CHECK(check,msg) ((check),0)
67
57#endif 68#endif
69
58/* Define an Emacs version of "assert", since some system ones are 70/* Define an Emacs version of "assert", since some system ones are
59 flaky. */ 71 flaky. */
60#if defined (__GNUC__) && __GNUC__ >= 2 && defined (__STDC__) 72#if defined (__GNUC__) && __GNUC__ >= 2 && defined (__STDC__)