diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2017-02-21 15:31:29 -0800 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2017-02-21 15:39:17 -0800 |
| commit | 83c9c6fc1cc943f239a021b42a8ca9b0e162198c (patch) | |
| tree | eb0a1840bc941357c4dffac5050776b5e8165cd3 /src/xterm.c | |
| parent | 5cbdaa98f975c870c4afa24346630a18b55f27ab (diff) | |
| download | emacs-83c9c6fc1cc943f239a021b42a8ca9b0e162198c.tar.gz emacs-83c9c6fc1cc943f239a021b42a8ca9b0e162198c.tar.bz2 emacs-83c9c6fc1cc943f239a021b42a8ca9b0e162198c.zip | |
Use float instead of Lisp_Object for rehash_size
* src/alloc.c (purecopy_hash_table):
* src/fns.c (maybe_resize_hash_table, Fmake_hash_table):
(Fhash_table_rehash_size):
* src/lisp.h (struct Lisp_Hash_Table.rehash_size):
The rehash_size member of struct Lisp_Hash_Table is now a
float, not a Lisp_Object.
* src/alloc.c (purecopy_hash_table): Assign members in order.
* src/fns.c (make_hash_table): Use EMACS_INT for size and
float for rehash_size, instead of Lisp_Object for both.
All callers changed.
* src/lisp.h (DEFAULT_REHASH_SIZE): Now float, not double,
and 1 smaller.
* src/print.c (print_object): Simplify by calling
Fhash_table_rehash_size and Fhash_table_rehash_threshold.
Avoid unnecessary NILP.
Diffstat (limited to 'src/xterm.c')
| -rw-r--r-- | src/xterm.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/xterm.c b/src/xterm.c index b04c6999b39..52bc8f9eca2 100644 --- a/src/xterm.c +++ b/src/xterm.c @@ -12874,8 +12874,8 @@ keysyms. The default is nil, which is the same as `super'. */); DEFVAR_LISP ("x-keysym-table", Vx_keysym_table, doc: /* Hash table of character codes indexed by X keysym codes. */); - Vx_keysym_table = make_hash_table (hashtest_eql, make_number (900), - make_float (DEFAULT_REHASH_SIZE), + Vx_keysym_table = make_hash_table (hashtest_eql, 900, + DEFAULT_REHASH_SIZE, DEFAULT_REHASH_THRESHOLD, Qnil, false); |