Index: emacs/src/eval.c diff -c emacs/src/eval.c:1.253 emacs/src/eval.c:1.254 *** emacs/src/eval.c:1.253 Thu Jul 21 15:03:38 2005 --- emacs/src/eval.c Sat Jul 23 19:09:09 2005 *************** *** 2094,2100 **** return form; QUIT; ! if (consing_since_gc > gc_cons_combined_threshold) { GCPRO1 (form); Fgarbage_collect (); --- 2094,2101 ---- return form; QUIT; ! if (consing_since_gc > gc_cons_threshold ! && consing_since_gc > gc_relative_threshold) { GCPRO1 (form); Fgarbage_collect (); *************** *** 2794,2800 **** register int i; QUIT; ! if (consing_since_gc > gc_cons_combined_threshold) Fgarbage_collect (); if (++lisp_eval_depth > max_lisp_eval_depth) --- 2795,2802 ---- register int i; QUIT; ! if (consing_since_gc > gc_cons_threshold ! && consing_since_gc > gc_relative_threshold) Fgarbage_collect (); if (++lisp_eval_depth > max_lisp_eval_depth)
_______________________________________________ Emacs-diffs mailing list Emacs-diffs@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-diffs