diff options
| author | Karoly Lorentey <[email protected]> | 2006-04-01 13:24:42 +0000 |
|---|---|---|
| committer | Karoly Lorentey <[email protected]> | 2006-04-01 13:24:42 +0000 |
| commit | 10a0e6fe87378d0dafb5ce257aa60c8a1b25c708 (patch) | |
| tree | db6f6272d381d3ca09c783cea7f5f3aaf8fafc99 /src/.gdbinit | |
| parent | 6bcc8ec7eb185314e1b24f285fdcc1e7093c1bc1 (diff) | |
| parent | afc749959d78f5b48b92de877067828d46c915ce (diff) | |
Merged from [email protected]
Patches applied:
* [email protected]/emacs--devo--0--patch-173
Update from CVS
* [email protected]/emacs--devo--0--patch-174
Merge from gnus--rel--5.10
* [email protected]/emacs--devo--0--patch-175
Update from CVS
* [email protected]/emacs--devo--0--patch-176
Merge from gnus--rel--5.10
* [email protected]/emacs--devo--0--patch-177
Update from CVS
* [email protected]/emacs--devo--0--patch-178
Update from CVS
* [email protected]/emacs--devo--0--patch-179
Update from erc--emacs--0
* [email protected]/emacs--devo--0--patch-180
Update from CVS
* [email protected]/emacs--devo--0--patch-181
Update from CVS
* [email protected]/emacs--devo--0--patch-182
Merge from gnus--rel--5.10
* [email protected]/emacs--devo--0--patch-183
Update from CVS
* [email protected]/emacs--devo--0--patch-184
Merge from gnus--rel--5.10
* [email protected]/emacs--devo--0--patch-185
Update from CVS
* [email protected]/emacs--devo--0--patch-186
Update from CVS
* [email protected]/emacs--devo--0--patch-187
Merge from gnus--rel--5.10
* [email protected]/gnus--rel--5.10--patch-65
Update from CVS
* [email protected]/gnus--rel--5.10--patch-66
Update from CVS
* [email protected]/gnus--rel--5.10--patch-67
Update from CVS
* [email protected]/gnus--rel--5.10--patch-68
Update from CVS
* [email protected]/gnus--rel--5.10--patch-69
Update from CVS
* [email protected]/gnus--rel--5.10--patch-70
Update from CVS
* [email protected]/gnus--rel--5.10--patch-71
Update from CVS
* [email protected]/gnus--rel--5.10--patch-72
Update from CVS
git-archimport-id: [email protected]/emacs--multi-tty--0--patch-542
Diffstat (limited to 'src/.gdbinit')
| -rw-r--r-- | src/.gdbinit | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/src/.gdbinit b/src/.gdbinit index 2dada42445..d40286f867 100644 --- a/src/.gdbinit +++ b/src/.gdbinit @@ -58,8 +58,14 @@ define xgettype end # Set up something to print out s-expressions. +# We save and restore print_output_debug_flag to prevent the w32 port +# from calling OutputDebugString, which causes GDB to display each +# character twice (yuk!). define pr + set $output_debug = print_output_debug_flag + set print_output_debug_flag = 0 set debug_print ($) + set print_output_debug_flag = $output_debug end document pr Print the emacs s-expression which is $. @@ -69,7 +75,10 @@ end # Print out s-expressions define pp set $tmp = $arg0 + set $output_debug = print_output_debug_flag + set print_output_debug_flag = 0 set safe_debug_print ($tmp) + set print_output_debug_flag = $output_debug end document pp Print the argument as an emacs s-expression @@ -81,7 +90,10 @@ define pp1 set $tmp = $arg0 echo $arg0 printf " = " + set $output_debug = print_output_debug_flag + set print_output_debug_flag = 0 set safe_debug_print ($tmp) + set print_output_debug_flag = $output_debug end document pp1 Print the argument as an emacs s-expression @@ -94,7 +106,10 @@ end # Print value of lisp variable define pv set $tmp = "$arg0" + set $output_debug = print_output_debug_flag + set print_output_debug_flag = 0 set safe_debug_print ( find_symbol_value (intern ($tmp))) + set print_output_debug_flag = $output_debug end document pv Print the value of the lisp variable given as argument. @@ -106,7 +121,10 @@ define pv1 set $tmp = "$arg0" echo $arg0 printf " = " + set $output_debug = print_output_debug_flag + set print_output_debug_flag = 0 set safe_debug_print (find_symbol_value (intern ($tmp))) + set print_output_debug_flag = $output_debug end document pv1 Print the value of the lisp variable given as argument. |