diff src/.gdbinit @ 68857:faf10626ffee

(xwindow): Update the code to show the window box.

--- a/src/.gdbinit	Mon Feb 13 16:18:46 2006 +0000
+++ b/src/.gdbinit	Mon Feb 13 18:45:39 2006 +0000
@@ -548,7 +548,16 @@
 define xwindow
   xgetptr $
   print (struct window *) $ptr
-  printf "%dx%d+%d+%d\n", $->width, $->height, $->left, $->top
+  set $window = (struct window *) $ptr
+  xgetint $window->total_cols
+  set $width=$int
+  xgetint $window->total_lines
+  set $height=$int
+  xgetint $window->left_col
+  set $left=$int
+  xgetint $window->top_line
+  set $top=$int
+  printf "%dx%d+%d+%d\n", $width, $height, $left, $top
 end
 document xwindow
 Print $ as a window pointer, assuming it is an Emacs Lisp window value.