procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Port to hypothetical case where Qnil is nonzero

Browse source 
* alloc.c (allocate_pseudovector):
* callint.c (Fcall_interactively):
* coding.c (syms_of_coding):
* dispnew.c (realloc_glyph_pool):
* fringe.c (init_fringe):
* lisp.h (memsetnil):
* xdisp.c (init_iterator):
Port to the currently-hypothetical case where Qnil is nonzero.
* dispnew.c (adjust_glyph_matrix): Remove unnecessary verification,
as there are no Lisp_Object values in the data here.
* lisp.h (NIL_IS_NONZERO): New symbol, replacing NIL_IS_ZERO.
All uses changed.  Define only if not already defined, so that one
can debug with -DNIL_IS_NONZERO.
* xdisp.c (init_iterator): Remove unnecessary initializations to 0.
This commit is contained in:
Paul Eggert 2015-01-19 16:49:11 -08:00
parent fb6462f056
commit 347e014471
8 changed files with 68 additions and 47 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/coding.c
View file

@ -11272,8 +11272,8 @@ internal character representation. */);
Vtranslation_table_for_input = Qnil;
{
verify (NIL_IS_ZERO);
Lisp_Object args[coding_arg_undecided_max] = { LISP_INITIALLY_ZERO, };
Lisp_Object args[coding_arg_undecided_max];
memsetnil (args, ARRAYELTS (args));
Lisp_Object plist[16];
plist[0] = intern_c_string (":name");