Mercurial > hg > xemacs-beta

diff src/eval.c @ 211:78478c60bfcd r20-4b4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-4b4
author cvs
date Mon, 13 Aug 2007 10:05:51 +0200
parents 850242ba4a81
children 2c611d1463a6
line wrap: on
line diff
--- a/src/eval.c	Mon Aug 13 10:05:01 2007 +0200
+++ b/src/eval.c	Mon Aug 13 10:05:51 2007 +0200
@@ -1447,9 +1447,11 @@
 throw_or_bomb_out (Lisp_Object tag, Lisp_Object val, int bomb_out_p,
 		   Lisp_Object sig, Lisp_Object data)
 {
+#if 0
   /* die if we recurse more than is reasonable */
   if (++throw_level > 20)
     abort();
+#endif
 
   /* If bomb_out_p is t, this is being called from Fsignal as a
      "last resort" when there is no handler for this error and