Mercurial > emacs
changeset 68297:9b3bace59343
Don't dereference Vsystem_type's Lisp_Symbol pointer if it is NULL.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Fri, 20 Jan 2006 14:18:38 +0000 |
| parents | 325cc3e47519 |
| children | f2e5b42a122e |
| files | src/.gdbinit |
| diffstat | 1 files changed, 14 insertions(+), 11 deletions(-) [+] |
line wrap: on
line diff
--- a/src/.gdbinit Fri Jan 20 13:55:02 2006 +0000 +++ b/src/.gdbinit Fri Jan 20 14:18:38 2006 +0000 @@ -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