Commit 74dd3a6b authored by Andreas Schwab's avatar Andreas Schwab
Browse files

* .gdbinit (xpr): Remove checks for no longer existing misc types.

(xintfwd, xboolfwd, xobjfwd, xbufobjfwd, xkbobjfwd, xbuflocal):
Remove.
parent 9cc7819c
...@@ -703,60 +703,6 @@ Print $ as a misc free-cell pointer. ...@@ -703,60 +703,6 @@ Print $ as a misc free-cell pointer.
This command assumes that $ is an Emacs Lisp Misc value. This command assumes that $ is an Emacs Lisp Misc value.
end end
define xintfwd
xgetptr $
print (struct Lisp_Intfwd *) $ptr
end
document xintfwd
Print $ as an integer forwarding pointer.
This command assumes that $ is an Emacs Lisp Misc value.
end
define xboolfwd
xgetptr $
print (struct Lisp_Boolfwd *) $ptr
end
document xboolfwd
Print $ as a boolean forwarding pointer.
This command assumes that $ is an Emacs Lisp Misc value.
end
define xobjfwd
xgetptr $
print (struct Lisp_Objfwd *) $ptr
end
document xobjfwd
Print $ as an object forwarding pointer.
This command assumes that $ is an Emacs Lisp Misc value.
end
define xbufobjfwd
xgetptr $
print (struct Lisp_Buffer_Objfwd *) $ptr
end
document xbufobjfwd
Print $ as a buffer-local object forwarding pointer.
This command assumes that $ is an Emacs Lisp Misc value.
end
define xkbobjfwd
xgetptr $
print (struct Lisp_Kboard_Objfwd *) $ptr
end
document xkbobjfwd
Print $ as a kboard-local object forwarding pointer.
This command assumes that $ is an Emacs Lisp Misc value.
end
define xbuflocal
xgetptr $
print (struct Lisp_Buffer_Local_Value *) $ptr
end
document xbuflocal
Print $ as a buffer-local-value pointer.
This command assumes that $ is an Emacs Lisp Misc value.
end
define xsymbol define xsymbol
set $sym = $ set $sym = $
xgetptr $sym xgetptr $sym
...@@ -1030,36 +976,12 @@ define xpr ...@@ -1030,36 +976,12 @@ define xpr
if $misc == Lisp_Misc_Free if $misc == Lisp_Misc_Free
xmiscfree xmiscfree
end end
if $misc == Lisp_Misc_Boolfwd
xboolfwd
end
if $misc == Lisp_Misc_Marker if $misc == Lisp_Misc_Marker
xmarker xmarker
end end
if $misc == Lisp_Misc_Intfwd
xintfwd
end
if $misc == Lisp_Misc_Boolfwd
xboolfwd
end
if $misc == Lisp_Misc_Objfwd
xobjfwd
end
if $misc == Lisp_Misc_Buffer_Objfwd
xbufobjfwd
end
if $misc == Lisp_Misc_Buffer_Local_Value
xbuflocal
end
# if $misc == Lisp_Misc_Some_Buffer_Local_Value
# xvalue
# end
if $misc == Lisp_Misc_Overlay if $misc == Lisp_Misc_Overlay
xoverlay xoverlay
end end
if $misc == Lisp_Misc_Kboard_Objfwd
xkbobjfwd
end
# if $misc == Lisp_Misc_Save_Value # if $misc == Lisp_Misc_Save_Value
# xsavevalue # xsavevalue
# end # end
......
2012-04-30 Andreas Schwab <schwab@linux-m68k.org>
* .gdbinit (xpr): Remove checks for no longer existing misc types.
(xintfwd, xboolfwd, xobjfwd, xbufobjfwd, xkbobjfwd, xbuflocal):
Remove.
2012-04-28 Paul Eggert <eggert@cs.ucla.edu> 2012-04-28 Paul Eggert <eggert@cs.ucla.edu>
Do not avoid creating empty evaporating overlays (Bug#9642). Do not avoid creating empty evaporating overlays (Bug#9642).
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment