aboutsummaryrefslogtreecommitdiffstats
path: root/src/eval.c
diff options
context:
space:
mode:
authorKarl Heuer <[email protected]>1994-05-17 22:58:29 +0000
committerKarl Heuer <[email protected]>1994-05-17 22:58:29 +0000
commitb6703b0279af7994ced4221309f36ad6c68d8207 (patch)
treed11d991bbfdc23a79b69f9065cdbf14bd964df65 /src/eval.c
parentca873d73a2026e11aa45abab25ae6c923055760a (diff)
(Fbacktrace): Properly nest parentheses.
(Fbacktrace_frame): Don't bomb on invalid frame number.
Diffstat (limited to 'src/eval.c')
-rw-r--r--src/eval.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/eval.c b/src/eval.c
index 673e1bfda6..ddea482515 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -2408,6 +2408,7 @@ Output stream used is value of `standard-output'.")
if (backlist->nargs == UNEVALLED)
{
Fprin1 (Fcons (*backlist->function, *backlist->args), Qnil);
+ write_string ("\n", -1);
}
else
{
@@ -2432,8 +2433,8 @@ Output stream used is value of `standard-output'.")
Fprin1 (backlist->args[i], Qnil);
}
}
+ write_string (")\n", -1);
}
- write_string (")\n", -1);
backlist = backlist->next;
}
@@ -2462,7 +2463,7 @@ If N is more than the number of frames, the value is nil.")
CHECK_NATNUM (nframes, 0);
/* Find the frame requested. */
- for (i = 0; i < XFASTINT (nframes); i++)
+ for (i = 0; backlist && i < XFASTINT (nframes); i++)
backlist = backlist->next;
if (!backlist)