From ed457320f4a0660b2821ebaa9c93e50e68530a4a Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sat, 20 Jan 2024 16:52:31 -0800 Subject: [PATCH] Speed up make_lisp_symbol when debugging * src/lisp.h (make_lisp_symbol): In eassert use XBARE_SYMBOL rather than XSYMBOL. This is safe because the symbol must be bare. The change speeds up make_lisp_symbol when debugging. (cherry picked from commit bdcd662a21f4c4265f704b69deb9cf277a663ea7) --- src/lisp.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/lisp.h b/src/lisp.h index c3309c81a16..f0beafba42c 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -1166,7 +1166,7 @@ make_lisp_symbol (struct Lisp_Symbol *sym) cast to char * rather than to intptr_t. */ char *symoffset = (char *) ((char *) sym - (char *) lispsym); Lisp_Object a = TAG_PTR (Lisp_Symbol, symoffset); - eassert (XSYMBOL (a) == sym); + eassert (XBARE_SYMBOL (a) == sym); return a; } -- 2.39.5