From 14fe0eec0cc6e4ad636d28832ca6ae22955abd81 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Sun, 8 May 2022 23:33:49 +0200 Subject: [PATCH] * src/lisp.h (FOR_EACH_TAIL_INTERNAL): Faster node comparison. --- src/lisp.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/lisp.h b/src/lisp.h index 1ad89fc4689..b00f3f7e2e6 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -5515,7 +5515,7 @@ struct for_each_tail_internal || ((check_quit) ? maybe_quit () : (void) 0, 0 < --li.n) \ || (li.q = li.n = li.max <<= 1, li.n >>= USHRT_WIDTH, \ li.tortoise = (tail), false)) \ - && EQ (tail, li.tortoise)) \ + && BASE_EQ (tail, li.tortoise)) \ ? (cycle) : (void) 0)) /* Do a `for' loop over alist values. */ -- 2.39.2