From 1b9ca1e5e646cdd678f0d29ef5e833c8ff2298c5 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Fri, 16 Dec 2022 14:14:42 +0200 Subject: [PATCH] ; Fix printing Lisp types in .gdbinit * src/alloc.c (valid_lisp_object_p): Support printing stack-allocated strings and cons cells. --- src/alloc.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/alloc.c b/src/alloc.c index 980085d3292..9feca7ae024 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -5275,7 +5275,8 @@ valid_lisp_object_p (Lisp_Object obj) if (valid <= 0) return valid; - if (SUBRP (obj)) + /* Strings and conses produced by AUTO_STRING etc. all get here. */ + if (SUBRP (obj) || STRINGP (obj) || CONSP (obj)) return 1; return 0; -- 2.39.2