emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master bdcd662a21f 5/6: Speed up make_lisp_symbol when debugging


From: Paul Eggert
Subject: master bdcd662a21f 5/6: Speed up make_lisp_symbol when debugging
Date: Sat, 20 Jan 2024 20:29:05 -0500 (EST)

branch: master
commit bdcd662a21f4c4265f704b69deb9cf277a663ea7
Author: Paul Eggert <eggert@cs.ucla.edu>
Commit: Paul Eggert <eggert@cs.ucla.edu>

    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.
---
 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;
 }
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]