Mercurial > emacs
diff src/alloc.c @ 83292:ad07ff6e4555
Merged from miles@gnu.org--gnu-2005 (patch 67, 270-278)
Patches applied:
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-270
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-271
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-272
src/xdisp.c (dump_glyph_row): Don't display overlay_arrow_p field.
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-273
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-274
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-275
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-276
Update from CVS
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-277
Merge from gnus--rel--5.10
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-278
Update from CVS
* miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-67
Update from CVS
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-332
| author | Karoly Lorentey <lorentey@elte.hu> |
|---|---|
| date | Mon, 25 Apr 2005 11:49:38 +0000 |
| parents | 360860a0006f 832617c86aa7 |
| children | 8b66fddd72c5 |
line wrap: on
line diff
--- a/src/alloc.c Mon Apr 25 11:47:55 2005 +0000 +++ b/src/alloc.c Mon Apr 25 11:49:38 2005 +0000 @@ -3015,18 +3015,18 @@ } -/* Return a newly created sub char table with default value DEFALT. +/* Return a newly created sub char table with slots initialized by INIT. Since a sub char table does not appear as a top level Emacs Lisp object, we don't need a Lisp interface to make it. */ Lisp_Object -make_sub_char_table (defalt) - Lisp_Object defalt; +make_sub_char_table (init) + Lisp_Object init; { Lisp_Object vector - = Fmake_vector (make_number (SUB_CHAR_TABLE_STANDARD_SLOTS), Qnil); + = Fmake_vector (make_number (SUB_CHAR_TABLE_STANDARD_SLOTS), init); XCHAR_TABLE (vector)->top = Qnil; - XCHAR_TABLE (vector)->defalt = defalt; + XCHAR_TABLE (vector)->defalt = Qnil; XSETCHAR_TABLE (vector, XCHAR_TABLE (vector)); return vector; }
