From: Mattias Engdegård <mattiase@acm.org>
Date: Sat, 11 Jun 2022 16:44:37 +0000 (+0200)
Subject: * src/fns.c (internal_equal): Use BASE_EQ where possible.
X-Git-Tag: emacs-29.0.90~1910^2~67
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=98365c7b1e1e1d3d5f7185f2d4a2baa1c65b4540;p=emacs.git

* src/fns.c (internal_equal): Use BASE_EQ where possible.
---

diff --git a/src/fns.c b/src/fns.c
index fceab9ba0ca..ab1d9696a6e 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -2519,7 +2519,7 @@ internal_equal (Lisp_Object o1, Lisp_Object o2, enum equal_kind equal_kind,
   if (SYMBOL_WITH_POS_P (o2))
     o2 = SYMBOL_WITH_POS_SYM (o2);
 
-  if (EQ (o1, o2))
+  if (BASE_EQ (o1, o2))
     return true;
   if (XTYPE (o1) != XTYPE (o2))
     return false;