diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2012-11-23 09:54:33 +0200 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2012-11-23 09:54:33 +0200 |
| commit | 8654a41b44c8fe925af2b10378faa09909699240 (patch) | |
| tree | 7a1a3783e4669bbdda969da35562fcadf1aa2ede /src/.gdbinit | |
| parent | cc4c01bd96b929e5b19bcb77eebd40e12930ef06 (diff) | |
| download | emacs-8654a41b44c8fe925af2b10378faa09909699240.tar.gz | |
Fix pgx in .gdbinit when CHECK_LISP_OBJECT_TYPE is defined.
src/.gdbinit (pgx): If the glyph's object is a string, display the
pointer to string data, rather than the value of the string object
itself (which barfs under CHECK_LISP_OBJECT_TYPE).
Diffstat (limited to 'src/.gdbinit')
| -rw-r--r-- | src/.gdbinit | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/.gdbinit b/src/.gdbinit index 952d7392a4c..98ae247b8c5 100644 --- a/src/.gdbinit +++ b/src/.gdbinit @@ -495,7 +495,8 @@ define pgx end xgettype ($g.object) if ($type == Lisp_String) - printf " str=%x[%d]", $g.object, $g.charpos + xgetptr $g.object + printf " str=0x%x[%d]", ((struct Lisp_String *)$ptr)->data, $g.charpos else printf " pos=%d", $g.charpos end |