[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master e7a6ce847fd 2/2: Don't use Qunbound as hash table key when printi
From: |
Mattias Engdegård |
Subject: |
master e7a6ce847fd 2/2: Don't use Qunbound as hash table key when printing (bug#68244) |
Date: |
Thu, 18 Jan 2024 12:59:06 -0500 (EST) |
branch: master
commit e7a6ce847fd06c4f132bbac2f2fdc8474753ad3c
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>
Don't use Qunbound as hash table key when printing (bug#68244)
This flaw could cause an assertion failure.
* src/print.c (PRINT_CIRCLE_CANDIDATE_P): Don't consider Qunbound a
print-circle candidate; it should never be seen by Lisp anyway.
---
src/print.c | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/src/print.c b/src/print.c
index 0899dcdeb03..61999c096aa 100644
--- a/src/print.c
+++ b/src/print.c
@@ -1311,7 +1311,8 @@ print (Lisp_Object obj, Lisp_Object printcharfun, bool
escapeflag)
|| RECORDP (obj))) \
|| (! NILP (Vprint_gensym) \
&& SYMBOLP (obj) \
- && !SYMBOL_INTERNED_P (obj)))
+ && !SYMBOL_INTERNED_P (obj) \
+ && !hash_unused_entry_key_p (obj)))
/* The print preprocess stack, used to traverse data structures. */