diff src/eval.c @ 5126:2a462149bd6a ben-lisp-object

merge
author Ben Wing <ben@xemacs.org>
date Wed, 24 Feb 2010 19:04:27 -0600
parents b5df3737028a 6f2158fa75ed
children a9c41067dd88
line wrap: on
line diff
--- a/src/eval.c	Wed Feb 24 01:58:04 2010 -0600
+++ b/src/eval.c	Wed Feb 24 19:04:27 2010 -0600
@@ -1766,8 +1766,7 @@
 {
 #ifdef DEFEND_AGAINST_THROW_RECURSION
   /* die if we recurse more than is reasonable */
-  if (++throw_level > 20)
-    ABORT ();
+  assert (++throw_level <= 20);
 #endif
 
 #ifdef ERROR_CHECK_TRAPPING_PROBLEMS