Mercurial > emacs
changeset 28430:f805ef5a2a03
* lisp.h (NO_UNION_TYPE) [ENABLE_CHECKING]: Undef.
author | Ken Raeburn <raeburn@raeburn.org> |
---|---|
date | Thu, 30 Mar 2000 22:27:55 +0000 |
parents | 2e3e0b3b6108 |
children | 315d6e79ea38 |
files | src/ChangeLog src/lisp.h |
diffstat | 2 files changed, 14 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/lisp.h Thu Mar 30 13:28:09 2000 +0000 +++ b/src/lisp.h Thu Mar 30 22:27:55 2000 +0000 @@ -48,13 +48,25 @@ /* Extra internal type checking? */ extern int suppress_checking; +extern void die P_((const char *, const char *, int)); + #ifdef ENABLE_CHECKING -extern void die P_((const char *, const char *, int)); -#define CHECK(check,msg) ((check || suppress_checking ? 0 : die (msg, __FILE__, __LINE__)), 0) + +#define CHECK(check,msg) ((check || suppress_checking \ + ? 0 \ + : die (msg, __FILE__, __LINE__)), \ + 0) + +/* Let's get some compile-time checking too. */ +#undef NO_UNION_TYPE + #else + /* Produce same side effects and result, but don't complain. */ #define CHECK(check,msg) ((check),0) + #endif + /* Define an Emacs version of "assert", since some system ones are flaky. */ #if defined (__GNUC__) && __GNUC__ >= 2 && defined (__STDC__)