diff options
| author | Stefan Monnier | 2002-06-17 16:16:14 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2002-06-17 16:16:14 +0000 |
| commit | bff1fa19e9e021f2a4c462cfd3db346d2718a6aa (patch) | |
| tree | 2ab1b7931e6649154f1e14daed843d1b5ca1de85 | |
| parent | f9c0c10f58b40bdb83795402f214646fe2939328 (diff) | |
| download | emacs-bff1fa19e9e021f2a4c462cfd3db346d2718a6aa.tar.gz emacs-bff1fa19e9e021f2a4c462cfd3db346d2718a6aa.zip | |
(xsymbol): Use the new `xname' field.
| -rw-r--r-- | src/.gdbinit | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/.gdbinit b/src/.gdbinit index 233640b8517..5f8768a8c92 100644 --- a/src/.gdbinit +++ b/src/.gdbinit | |||
| @@ -159,7 +159,8 @@ end | |||
| 159 | 159 | ||
| 160 | define xsymbol | 160 | define xsymbol |
| 161 | print (struct Lisp_Symbol *) ((((int) $) & $valmask) | gdb_data_seg_bits) | 161 | print (struct Lisp_Symbol *) ((((int) $) & $valmask) | gdb_data_seg_bits) |
| 162 | output (char*)$->name->data | 162 | set $xsymbol_name = ((struct Lisp_String *)(($->xname & $valmask) | gdb_data_seg_bits)) |
| 163 | output ($xsymbol_name->data[0])@($xsymbol_name->size_byte < 0 ? $xsymbol_name->size : $xsymbol_name->size_byte) | ||
| 163 | echo \n | 164 | echo \n |
| 164 | end | 165 | end |
| 165 | document xsymbol | 166 | document xsymbol |