1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-06 05:52:32 -08:00

Don't dereference Vsystem_type's Lisp_Symbol pointer if it is NULL.

This commit is contained in:
Eli Zaretskii 2006-01-20 14:19:14 +00:00
parent 7662f8adff
commit ea5f3ad489
2 changed files with 19 additions and 11 deletions

View file

@ -766,18 +766,21 @@ set args -geometry 80x40+0+0
# 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

View file

@ -1,3 +1,8 @@
2006-01-20 Eli Zaretskii <eliz@gnu.org>
* .gdbinit: Don't dereference Vsystem_type's Lisp_Symbol pointer
if it is NULL.
2006-01-20 Kenichi Handa <handa@m17n.org>
* puresize.h (BASE_PURESIZE): Increment to 1190000.