From 2231a9e22d476a05c5595febcd0fe0e6f2e9b8ff Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Sun, 11 Dec 2005 15:35:51 +0000
Subject: [PATCH] (EQ): Use == so args are computed just once.

---
 src/lisp.h | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/lisp.h b/src/lisp.h
index ad5088da65f..b8213c516cb 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -454,7 +454,7 @@ enum pvec_type
 extern Lisp_Object make_number P_ ((EMACS_INT));
 #endif
 
-#define EQ(x, y) ((x).s.val == (y).s.val && (x).s.type == (y).s.type)
+#define EQ(x, y) ((x).i == (y).i)
 
 #endif /* NO_UNION_TYPE */
 
-- 
2.39.5