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).
This commit is contained in:
Eli Zaretskii 2012-11-23 09:54:33 +02:00
parent cc4c01bd96
commit 8654a41b44
2 changed files with 8 additions and 1 deletions

View file

@ -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

View file

@ -1,3 +1,9 @@
2012-11-23 Eli Zaretskii <eliz@gnu.org>
* .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).
2012-11-21 Eli Zaretskii <eliz@gnu.org>
* indent.c (Fvertical_motion): If the starting position is covered