[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/.gdbinit
From: |
Andreas Schwab |
Subject: |
[Emacs-diffs] Changes to emacs/src/.gdbinit |
Date: |
Sat, 19 Nov 2005 12:13:07 -0500 |
Index: emacs/src/.gdbinit
diff -c emacs/src/.gdbinit:1.70 emacs/src/.gdbinit:1.71
*** emacs/src/.gdbinit:1.70 Wed Nov 16 01:03:35 2005
--- emacs/src/.gdbinit Sat Nov 19 17:13:07 2005
***************
*** 1,4 ****
! # Copyright (C) 1992, 93, 94, 95, 96, 97, 1998, 2000, 01, 2004
# Free Software Foundation, Inc.
#
# This file is part of GNU Emacs.
--- 1,4 ----
! # Copyright (C) 1992, 93, 94, 95, 96, 97, 1998, 2000, 01, 2004, 2005
# Free Software Foundation, Inc.
#
# This file is part of GNU Emacs.
***************
*** 29,35 ****
# This has one unfortunate effect: you can't type C-c
# at the GDB to stop Emacs, when using X.
# However, C-z works just as well in that case.
! handle 2 noprint pass
# Make it work like SIGINT normally does.
handle SIGTSTP nopass
--- 29,35 ----
# This has one unfortunate effect: you can't type C-c
# at the GDB to stop Emacs, when using X.
# However, C-z works just as well in that case.
! #handle 2 noprint pass
# Make it work like SIGINT normally does.
handle SIGTSTP nopass
***************
*** 628,634 ****
end
define nextcons
! p $.cdr
xcons
end
document nextcons
--- 628,634 ----
end
define nextcons
! p $.u.cdr
xcons
end
document nextcons
***************
*** 648,654 ****
define xcdr
xgetptr $
xgettype $
! print/x ($type == Lisp_Cons ? ((struct Lisp_Cons *) $ptr)->cdr : 0)
end
document xcdr
Print the cdr of $, assuming it is an Emacs Lisp pair.
--- 648,654 ----
define xcdr
xgetptr $
xgettype $
! print/x ($type == Lisp_Cons ? ((struct Lisp_Cons *) $ptr)->u.cdr : 0)
end
document xcdr
Print the cdr of $, assuming it is an Emacs Lisp pair.
***************
*** 656,662 ****
define xfloat
xgetptr $
! print ((struct Lisp_Float *) $ptr)->data
end
document xfloat
Print $ assuming it is a lisp floating-point number.
--- 656,662 ----
define xfloat
xgetptr $
! print ((struct Lisp_Float *) $ptr)->u.data
end
document xfloat
Print $ assuming it is a lisp floating-point number.
***************
*** 762,768 ****
show environment DISPLAY
show environment TERM
! set args -geometry 80x40+0+0
# Don't let abort actually run, as it will make
# stdio stop working and therefore the `pr' command above as well.
--- 762,768 ----
show environment DISPLAY
show environment TERM
! #set args -geometry 80x40+0+0
# Don't let abort actually run, as it will make
# stdio stop working and therefore the `pr' command above as well.