X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=src%2Feval.c;h=4c6eddc6ff4c05aa67c1ebed8f90c257f8780c63;hb=56c8b099ccef8240d76c6f88c3f31d86ae22cfba;hp=292b056d9e4ce2e48b2c86f5be61268e019167b2;hpb=ca52abdc354d49e06fd5275eb49b5b98da12a7f3;p=sxemacs

diff --git a/src/eval.c b/src/eval.c
index 292b056..4c6eddc 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -2819,8 +2819,8 @@ and input is currently coming from the keyboard (not in keyboard macro).
 */
       ())
 {
-	REGISTER struct backtrace *btp;
-	REGISTER Lisp_Object fun;
+	REGISTER struct backtrace *btp = NULL;
+	REGISTER Lisp_Object fun = Qnil;
 
 	if (!INTERACTIVE)
 		return Qnil;
@@ -2877,7 +2877,8 @@ and input is currently coming from the keyboard (not in keyboard macro).
 
 #endif
 
-	fun = Findirect_function(*btp->function);
+	if (btp)
+		fun = Findirect_function(*btp->function);
 	if (SUBRP(fun))
 		return Qnil;
 	/* btp points to the frame of a Lisp function that called interactive-p.