[Emacs-diffs] /srv/bzr/emacs/trunk r99938: .gdbinit (xsubchartable): New command.

[Eli Zaretskii]

------------------------------------------------------------
revno: 99938
committer: Eli Zaretskii <address@hidden>
branch nick: trunk
timestamp: Mon 2010-04-19 16:05:35 +0300
message:
   .gdbinit (xsubchartable): New command.
modified:
  src/.gdbinit
  src/ChangeLog

=== modified file 'src/.gdbinit'
--- a/src/.gdbinit      2010-03-13 16:38:01 +0000
+++ b/src/.gdbinit      2010-04-19 13:05:35 +0000
@@ -889,6 +889,19 @@
 This command assumes that $ is an Emacs Lisp char-table value.
 end
 
+define xsubchartable
+  xgetptr $
+  print (struct Lisp_Sub_Char_Table *) $ptr
+  xgetint $->depth
+  set $depth = $int
+  xgetint $->min_char
+  printf "Depth: %d, Min char: %d (0x%x)\n", $depth, $int, $int
+end
+document xsubchartable
+Print the address of the sub-char-table $, its depth and min-char.
+This command assumes that $ is an Emacs Lisp sub-char-table value.
+end
+
 define xboolvector
   xgetptr $
   print (struct Lisp_Bool_Vector *) $ptr

=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2010-04-19 12:12:13 +0000
+++ b/src/ChangeLog     2010-04-19 13:05:35 +0000
@@ -1,5 +1,7 @@
 2010-04-19  Eli Zaretskii  <address@hidden>
 
+       * .gdbinit (xsubchartable): New command.
+
        * xdisp.c (display_line): Don't write beyond the last glyph row in
        the desired matrix.  Fixes a crash in "emacs -nw", see
        http://lists.gnu.org/archive/html/emacs-devel/2010-04/msg00075.html