From: Karl Heuer <kwzh@gnu.org>
Date: Mon, 19 Sep 1994 00:15:36 +0000 (+0000)
Subject: (Fsignal): Fix Lisp_Object vs. int problems.
X-Git-Tag: emacs-19.34~6952
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dff36a4234b485a2c74cf5e3eac3505bfbeeccc3;p=emacs.git

(Fsignal): Fix Lisp_Object vs. int problems.
---

diff --git a/src/eval.c b/src/eval.c
index 40102788b8a..4ee76ff531c 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1199,7 +1199,7 @@ See also the function `condition-case'.")
 	  struct handler *h = handlerlist;
 
 	  handlerlist = allhandlers;
-	  if (data == memory_signal_data)
+	  if (EQ (data, memory_signal_data))
 	    unwind_data = memory_signal_data;
 	  else
 	    unwind_data = Fcons (error_symbol, data);