Mercurial > emacs

comparison src/bytecode.c @ 62981:79e0dd73c671

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(BYTE_CODE_QUIT): Check Vthrow_on_input.
author Kim F. Storm <storm@cua.dk>
date Fri, 03 Jun 2005 23:02:30 +0000
parents 569cd6a5babd
children a8fa7c632ee4 01137c1fdbe9
comparison
equal deleted inserted replaced
62980:5b94f4660d9d 62981:79e0dd73c671
382 382
383 #define BYTE_CODE_QUIT \ 383 #define BYTE_CODE_QUIT \
384 do { \ 384 do { \
385 if (!NILP (Vquit_flag) && NILP (Vinhibit_quit)) \ 385 if (!NILP (Vquit_flag) && NILP (Vinhibit_quit)) \
386 { \ 386 { \
387 Lisp_Object flag = Vquit_flag; \
387 Vquit_flag = Qnil; \ 388 Vquit_flag = Qnil; \
388 BEFORE_POTENTIAL_GC (); \ 389 BEFORE_POTENTIAL_GC (); \
390 if (EQ (Vthrow_on_input, flag)) \
391 Fthrow (Vthrow_on_input, Qnil); \
389 Fsignal (Qquit, Qnil); \ 392 Fsignal (Qquit, Qnil); \
390 AFTER_POTENTIAL_GC (); \ 393 AFTER_POTENTIAL_GC (); \
391 } \ 394 } \
392 } while (0) 395 } while (0)
393 396