procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* .gdbinit (xpr): Handle USE_2_TAGS_FOR_INTS.

Browse source 
(xgetint): Add missing shift for LSB tags.
This commit is contained in:
Andreas Schwab 2012-04-24 21:05:25 +02:00
parent e43042fe33
commit 42bf82050b
2 changed files with 15 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
src/.gdbinit
View file

@ -54,7 +54,7 @@ end
define xgetint
set $bugfix = $arg0
set $int = gdb_use_union ? $bugfix.s.val : (gdb_use_lsb ? $bugfix : $bugfix << gdb_gctypebits) >> gdb_gctypebits
set $int = gdb_use_union ? $bugfix.s.val : (gdb_use_lsb ? $bugfix >> (gdb_gctypebits - 1) : $bugfix << gdb_gctypebits) >> gdb_gctypebits
end
define xgettype
@ -1003,8 +1003,15 @@ end
define xpr
xtype
if $type == Lisp_Int
xint
if gdb_use_union
if $type == Lisp_Int
xint
end
end
if !gdb_use_union
if $type == Lisp_Int0 || $type == Lisp_Int1
xint
end
end
if $type == Lisp_Symbol
xsymbol

5
src/ChangeLog
View file

@ -1,3 +1,8 @@
2012-04-24 Andreas Schwab <schwab@linux-m68k.org>
* .gdbinit (xpr): Handle USE_2_TAGS_FOR_INTS.
(xgetint): Add missing shift for LSB tags.
2012-04-24 Martin Rudalics <rudalics@gmx.at>
* keyboard.c (read_char): Don't wipe echo area for select window