diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2012-02-20 16:07:53 -0800 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2012-02-20 16:07:53 -0800 |
commit | cb3a28cc909e79244a477dcc357e38da658a8992 (patch) | |
tree | f782cc1941a9aa4fde43789f81ec0ba00b9ad3c4 /etc/emacs-buffer.gdb | |
parent | 2d2f6581283113ad4c806e7f176724e7d3013172 (diff) | |
download | emacs-cb3a28cc909e79244a477dcc357e38da658a8992.tar.gz emacs-cb3a28cc909e79244a477dcc357e38da658a8992.tar.bz2 emacs-cb3a28cc909e79244a477dcc357e38da658a8992.zip |
In GDB scripts, don't assume that EMACS_INT fits in long.
* etc/emacs-buffer.gdb ($valmask): Don't assume EMACS_INT fits in 'long'.
* src/.gdbinit (xreload): Likewise.
Diffstat (limited to 'etc/emacs-buffer.gdb')
-rw-r--r-- | etc/emacs-buffer.gdb | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/etc/emacs-buffer.gdb b/etc/emacs-buffer.gdb index 2bd2fa23794..80f69c585dc 100644 --- a/etc/emacs-buffer.gdb +++ b/etc/emacs-buffer.gdb @@ -78,7 +78,9 @@ set $yverbose = 1 set $yfile_buffers_only = 0 set $tagmask = (((long)1 << gdb_gctypebits) - 1) -set $valmask = gdb_use_lsb ? ~($tagmask) : ((long)1 << gdb_valbits) - 1 +# The consing_since_gc business widens the 1 to EMACS_INT, +# a symbol not directly visible to GDB. +set $valmask = gdb_use_lsb ? ~($tagmask) : ((consing_since_gc - consing_since_gc + 1) << gdb_valbits) - 1 define ygetptr set $ptr = $arg0 |