Mercurial > emacs
diff src/eval.c @ 706:86cb5db0b6c3
*** empty log message ***
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 10 Jun 1992 02:25:55 +0000 |
| parents | e2b747dd6a6e |
| children | 540b047ece4d |
line wrap: on
line diff
--- a/src/eval.c Wed Jun 10 01:34:51 1992 +0000 +++ b/src/eval.c Wed Jun 10 02:25:55 1992 +0000 @@ -103,11 +103,11 @@ int debug_on_next_call; /* List of conditions (non-nil atom means all) which cause a backtrace - if an error is handled by the command loop's error handler. + if an error is handled by the command loop's error handler. */ Lisp_Object Vstack_trace_on_error; /* List of conditions (non-nil atom means all) which enter the debugger - if an error is handled by the command loop's error handler. + if an error is handled by the command loop's error handler. */ Lisp_Object Vdebug_on_error; /* Nonzero means enter debugger if a quit signal @@ -1139,17 +1139,17 @@ return 1; } - if (NULL (list)) + if (NILP (list)) return 0; if (! CONSP (list)) return 1; looking = 1; - while (!NULL (conditions)) + while (!NILP (conditions)) { Lisp_Object tem; tem = Fmemq (XCONS (conditions)->car, list); - if (! NULL (tem)) + if (! NILP (tem)) { looking = 0; return 1;
