diff options
| author | Richard M. Stallman <rms@gnu.org> | 2006-02-13 18:45:39 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2006-02-13 18:45:39 +0000 |
| commit | 52ba37dec544ff6415ba9620faa6eb30e5a07ac8 (patch) | |
| tree | e573f9444d2dd1e0b845110b26fcf45ebd96eab6 /src/.gdbinit | |
| parent | 7bfcdbe49959dc7c111c4140bde1d87f5e975d0f (diff) | |
| download | emacs-52ba37dec544ff6415ba9620faa6eb30e5a07ac8.tar.gz | |
(xwindow): Update the code to show the window box.
Diffstat (limited to 'src/.gdbinit')
| -rw-r--r-- | src/.gdbinit | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/src/.gdbinit b/src/.gdbinit index c67e0b0389f..aeabe19100e 100644 --- a/src/.gdbinit +++ b/src/.gdbinit @@ -548,7 +548,16 @@ end 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. |