Mercurial > hg > xemacs-beta

diff src/eval.c @ 4162:8f6a825eb3d3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2007-09-04 21:20:18 by aidan] Eliminate a crash when profiling; only pass the backtrace record to profile_record_about_to_call, profile_record_just_called when it's non-nil.
author aidan
date Tue, 04 Sep 2007 21:20:26 +0000
parents 23d7fde3d773
children 8748a3f7ceb4
line wrap: on
line diff
--- a/src/eval.c	Mon Sep 03 21:51:09 2007 +0000
+++ b/src/eval.c	Tue Sep 04 21:20:26 2007 +0000
@@ -3100,7 +3100,7 @@
   /* This function can GC */
   Lisp_Object prefixarg;
   Lisp_Object final = cmd;
-  struct backtrace backtrace;
+  PROFILE_DECLARE();
   struct console *con = XCONSOLE (Vselected_console);
 
   prefixarg = con->prefix_arg;
@@ -3533,7 +3533,7 @@
   /* This function can GC */
   Lisp_Object fun, val, original_fun, original_args;
   int nargs;
-  struct backtrace backtrace;
+  PROFILE_DECLARE();
 
 #ifdef ERROR_CHECK_TRAPPING_PROBLEMS
   check_proper_critical_section_lisp_protection ();
@@ -3841,7 +3841,7 @@
   /* This function can GC */
   Lisp_Object fun;
   Lisp_Object val;
-  struct backtrace backtrace;
+  PROFILE_DECLARE();
   int fun_nargs = nargs - 1;
   Lisp_Object *fun_args = args + 1;