(xsymbol): Use the new `xname' field.
This commit is contained in:
parent
f9c0c10f58
commit
bff1fa19e9
1 changed files with 2 additions and 1 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Reference in a new issue