diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-05-17 22:58:29 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-05-17 22:58:29 +0000 |
| commit | b6703b0279af7994ced4221309f36ad6c68d8207 (patch) | |
| tree | d11d991bbfdc23a79b69f9065cdbf14bd964df65 /src/eval.c | |
| parent | ca873d73a2026e11aa45abab25ae6c923055760a (diff) | |
| download | emacs-b6703b0279af7994ced4221309f36ad6c68d8207.tar.gz | |
(Fbacktrace): Properly nest parentheses.
(Fbacktrace_frame): Don't bomb on invalid frame number.
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/eval.c b/src/eval.c index 673e1bfda64..ddea482515f 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) |