Mercurial > hg > xemacs-beta

comparison src/emacs.c @ 54:05472e90ae02 r19-16-pre2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-16-pre2
author cvs
date Mon, 13 Aug 2007 08:57:55 +0200
parents ee648375d8d6
children 131b0175ea99
comparison
equal deleted inserted replaced
53:875393c1a535 54:05472e90ae02
177 EMACS_UNBLOCK_SIGNAL (fatal_error_code); 177 EMACS_UNBLOCK_SIGNAL (fatal_error_code);
178 178
179 /* If fatal error occurs in code below, avoid infinite recursion. */ 179 /* If fatal error occurs in code below, avoid infinite recursion. */
180 if (! fatal_error_in_progress) 180 if (! fatal_error_in_progress)
181 { 181 {
182 fatal_error_in_progress = 1; 182 fatal_error_in_progress = dont_check_for_quit = 1;
183 shut_down_emacs (sig, Qnil); 183 shut_down_emacs (sig, Qnil);
184 stderr_out("\nLisp backtrace follows:\n\n"); 184 stderr_out("\nLisp backtrace follows:\n\n");
185 Fbacktrace(Qexternal_debugging_output, Qt); 185 Fbacktrace(Qexternal_debugging_output, Qt);
186 186
187 # if 0 /* This is evil, rarely useful, and causes grief in some cases. */ 187 # if 0 /* This is evil, rarely useful, and causes grief in some cases. */