Mercurial > emacs
comparison src/eval.c @ 37043:451c5848dd13
(call_debugger): Bind `inhibit-redisplay' to nil, and
bind inhibit-eval-during-redisplay' to t.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Wed, 28 Mar 2001 15:33:13 +0000 |
| parents | d37840301629 |
| children | f98176963881 |
comparison
equal
deleted
inserted
replaced
| 37042:a644f4966169 | 37043:451c5848dd13 |
|---|---|
| 252 displayed if the debugger is invoked during redisplay. */ | 252 displayed if the debugger is invoked during redisplay. */ |
| 253 debug_while_redisplaying = redisplaying_p; | 253 debug_while_redisplaying = redisplaying_p; |
| 254 redisplaying_p = 0; | 254 redisplaying_p = 0; |
| 255 specbind (intern ("debugger-may-continue"), | 255 specbind (intern ("debugger-may-continue"), |
| 256 debug_while_redisplaying ? Qnil : Qt); | 256 debug_while_redisplaying ? Qnil : Qt); |
| 257 specbind (Qinhibit_redisplay, Qnil); | |
| 258 specbind (Qinhibit_eval_during_redisplay, Qt); | |
| 257 | 259 |
| 258 val = apply1 (Vdebugger, arg); | 260 val = apply1 (Vdebugger, arg); |
| 259 | 261 |
| 260 /* Interrupting redisplay and resuming it later is not safe under | 262 /* Interrupting redisplay and resuming it later is not safe under |
| 261 all circumstances. So, when the debugger returns, abort the | 263 all circumstances. So, when the debugger returns, abort the |