Mercurial > emacs

comparison src/bytecode.c @ 107338:feb1bc86a749

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Make it possible to C-g in a tight bytecode loop again (bug#5680). * lisp.h (ELSE_PENDING_SIGNALS): New macro. (QUIT): Use it to consolidate code and remove redundancy. * bytecode.c (BYTE_CODE_QUIT): Use it as well.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 05 Mar 2010 18:08:18 -0500
parents 1d1d5d9bd884
children bef5d1738c0b 376148b31b5e
comparison
equal deleted inserted replaced
107337:df618c2d11bb 107338:feb1bc86a749
391 if (EQ (Vthrow_on_input, flag)) \ 391 if (EQ (Vthrow_on_input, flag)) \
392 Fthrow (Vthrow_on_input, Qt); \ 392 Fthrow (Vthrow_on_input, Qt); \
393 Fsignal (Qquit, Qnil); \ 393 Fsignal (Qquit, Qnil); \
394 AFTER_POTENTIAL_GC (); \ 394 AFTER_POTENTIAL_GC (); \
395 } \ 395 } \
396 ELSE_PENDING_SIGNALS \
396 } while (0) 397 } while (0)
397 398
398 399
399 DEFUN ("byte-code", Fbyte_code, Sbyte_code, 3, 3, 0, 400 DEFUN ("byte-code", Fbyte_code, Sbyte_code, 3, 3, 0,
400 doc: /* Function used internally in byte-compiled code. 401 doc: /* Function used internally in byte-compiled code.