aboutsummaryrefslogtreecommitdiffstats
path: root/src/eval.c
diff options
context:
space:
mode:
authorKaroly Lorentey2004-05-30 21:11:48 +0000
committerKaroly Lorentey2004-05-30 21:11:48 +0000
commita596810c6c3c3c2fd450717f5083a5ff5207d243 (patch)
treee84b4a480f6b5bdfb232a384c4c77472950be2a8 /src/eval.c
parent3de8a2533978f2e296b418a1ab0ae41deb00fa40 (diff)
parent9dd5e8d7c1e0cb26cc75f8cdf91eeaa170b48a6a (diff)
downloademacs-a596810c6c3c3c2fd450717f5083a5ff5207d243.tar.gz
emacs-a596810c6c3c3c2fd450717f5083a5ff5207d243.zip
Merged in changes from CVS trunk.
Patches applied: * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-344 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-345 Tweak source regexps so that building in place won't cause problems * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-346 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-347 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-348 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-349 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-350 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-351 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-352 Update from CVS: lisp/flymake.el: New file. git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-182
Diffstat (limited to 'src/eval.c')
-rw-r--r--src/eval.c19
1 files changed, 19 insertions, 0 deletions
diff --git a/src/eval.c b/src/eval.c
index 0326a828a81..921a7533a60 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -3243,6 +3243,25 @@ If NFRAMES is more than the number of frames, the value is nil. */)
3243 3243
3244 3244
3245void 3245void
3246mark_backtrace ()
3247{
3248 register struct backtrace *backlist;
3249 register int i;
3250
3251 for (backlist = backtrace_list; backlist; backlist = backlist->next)
3252 {
3253 mark_object (*backlist->function);
3254
3255 if (backlist->nargs == UNEVALLED || backlist->nargs == MANY)
3256 i = 0;
3257 else
3258 i = backlist->nargs - 1;
3259 for (; i >= 0; i--)
3260 mark_object (backlist->args[i]);
3261 }
3262}
3263
3264void
3246syms_of_eval () 3265syms_of_eval ()
3247{ 3266{
3248 DEFVAR_INT ("max-specpdl-size", &max_specpdl_size, 3267 DEFVAR_INT ("max-specpdl-size", &max_specpdl_size,