diff options
| author | Gerd Moellmann | 2000-07-05 12:36:14 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2000-07-05 12:36:14 +0000 |
| commit | cadf6ba27cb7f85395009e47dabc28efe945d087 (patch) | |
| tree | 108e34a36ff2a5ceaa21de17953334bc863b1558 /src/eval.c | |
| parent | 71201b0094e845406c16b866bd0a493a878785cb (diff) | |
| download | emacs-cadf6ba27cb7f85395009e47dabc28efe945d087.tar.gz emacs-cadf6ba27cb7f85395009e47dabc28efe945d087.zip | |
(Feval): Put check for interrupt_input_block in #if 0.
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/eval.c b/src/eval.c index d616addde43..99baf8b9ab6 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -1762,10 +1762,14 @@ DEFUN ("eval", Feval, Seval, 1, 1, 0, | |||
| 1762 | struct backtrace backtrace; | 1762 | struct backtrace backtrace; |
| 1763 | struct gcpro gcpro1, gcpro2, gcpro3; | 1763 | struct gcpro gcpro1, gcpro2, gcpro3; |
| 1764 | 1764 | ||
| 1765 | #if 0 /* Can't do this check anymore because realize_basic_faces has | ||
| 1766 | to BLOCK_INPUT, and can call Lisp. What's really needed is a | ||
| 1767 | flag indicating that we're currently handling a signal. */ | ||
| 1765 | /* Since Fsignal resets this to 0, it had better be 0 now | 1768 | /* Since Fsignal resets this to 0, it had better be 0 now |
| 1766 | or else we have a potential bug. */ | 1769 | or else we have a potential bug. */ |
| 1767 | if (interrupt_input_blocked != 0) | 1770 | if (interrupt_input_blocked != 0) |
| 1768 | abort (); | 1771 | abort (); |
| 1772 | #endif | ||
| 1769 | 1773 | ||
| 1770 | if (SYMBOLP (form)) | 1774 | if (SYMBOLP (form)) |
| 1771 | { | 1775 | { |