From 98365c7b1e1e1d3d5f7185f2d4a2baa1c65b4540 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= <mattiase@acm.org>
Date: Sat, 11 Jun 2022 18:44:37 +0200
Subject: [PATCH] * src/fns.c (internal_equal): Use BASE_EQ where possible.
---
src/fns.c | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
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;
--
2.39.5