Mercurial > emacs
changeset 26309:8817f3f80755
(QUIT): Give it statement form.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Tue, 02 Nov 1999 13:24:17 +0000 |
parents | c2138070615f |
children | f7812754ea2a |
files | src/lisp.h |
diffstat | 1 files changed, 8 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/lisp.h Tue Nov 02 12:58:32 1999 +0000 +++ b/src/lisp.h Tue Nov 02 13:24:17 1999 +0000 @@ -1499,9 +1499,14 @@ This is a good thing to do around a loop that has no side effects and (in particular) cannot call arbitrary Lisp code. */ -#define QUIT \ - if (!NILP (Vquit_flag) && NILP (Vinhibit_quit)) \ - { Vquit_flag = Qnil; Fsignal (Qquit, Qnil); } +#define QUIT \ + do { \ + if (!NILP (Vquit_flag) && NILP (Vinhibit_quit)) \ + { \ + Vquit_flag = Qnil; \ + Fsignal (Qquit, Qnil); \ + } \ + } while (0) /* Nonzero if ought to quit now. */