From e7a6ce847fd06c4f132bbac2f2fdc8474753ad3c Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Thu, 18 Jan 2024 18:48:12 +0100 Subject: [PATCH] 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. */ -- 2.39.2