emacs-29 1b9ca1e5e6: ; Fix printing Lisp types in .gdbinit

[Eli Zaretskii]

branch: emacs-29
commit 1b9ca1e5e646cdd678f0d29ef5e833c8ff2298c5
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>

    ; 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 980085d329..9feca7ae02 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;