From: Karl Heuer <kwzh@gnu.org>
Date: Tue, 17 May 1994 22:58:29 +0000 (+0000)
Subject: (Fbacktrace): Properly nest parentheses.
X-Git-Tag: emacs-19.34~8320
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b6703b0279af7994ced4221309f36ad6c68d8207;p=emacs.git

(Fbacktrace): Properly nest parentheses.
(Fbacktrace_frame): Don't bomb on invalid frame number.
---

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)