From bff1fa19e9e021f2a4c462cfd3db346d2718a6aa Mon Sep 17 00:00:00 2001
From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Mon, 17 Jun 2002 16:16:14 +0000
Subject: [PATCH] (xsymbol): Use the new `xname' field.

---
 src/.gdbinit | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/.gdbinit b/src/.gdbinit
index 233640b8517..5f8768a8c92 100644
--- a/src/.gdbinit
+++ b/src/.gdbinit
@@ -159,7 +159,8 @@ end
 
 define xsymbol
 print (struct Lisp_Symbol *) ((((int) $) & $valmask) | gdb_data_seg_bits)
-output (char*)$->name->data
+set $xsymbol_name = ((struct Lisp_String *)(($->xname & $valmask) | gdb_data_seg_bits))
+output ($xsymbol_name->data[0])@($xsymbol_name->size_byte < 0 ? $xsymbol_name->size : $xsymbol_name->size_byte)
 echo \n
 end
 document xsymbol
-- 
2.11.4.GIT