[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/.gdbinit
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] Changes to emacs/src/.gdbinit |
Date: |
Fri, 20 Jan 2006 14:18:39 +0000 |
Index: emacs/src/.gdbinit
diff -u emacs/src/.gdbinit:1.79 emacs/src/.gdbinit:1.80
--- emacs/src/.gdbinit:1.79 Fri Jan 6 17:31:59 2006
+++ emacs/src/.gdbinit Fri Jan 20 14:18:38 2006
@@ -766,18 +766,21 @@
# People get bothered when they see messages about non-existent functions...
xgetptr Vsystem_type
-set $tem = (struct Lisp_Symbol *) $ptr
-xgetptr $tem->xname
-set $tem = (struct Lisp_String *) $ptr
-set $tem = (char *) $tem->data
+# $ptr is NULL in temacs
+if ($ptr != 0)
+ set $tem = (struct Lisp_Symbol *) $ptr
+ xgetptr $tem->xname
+ set $tem = (struct Lisp_String *) $ptr
+ set $tem = (char *) $tem->data
-# Don't let abort actually run, as it will make stdio stop working and
-# therefore the `pr' command above as well.
-if $tem[0] == 'w' && $tem[1] == 'i' && $tem[2] == 'n' && $tem[3] == 'd'
- # The windows-nt build replaces abort with its own function.
- break w32_abort
-else
- break abort
+ # Don't let abort actually run, as it will make stdio stop working and
+ # therefore the `pr' command above as well.
+ if $tem[0] == 'w' && $tem[1] == 'i' && $tem[2] == 'n' && $tem[3] == 'd'
+ # The windows-nt build replaces abort with its own function.
+ break w32_abort
+ else
+ break abort
+ end
end
# x_error_quitter is defined only on X. But window-system is set up