* src/comp.c (Fcomp__compile_ctxt_to_file): Fix hash table Qunbound use.
This commit is contained in:
parent
a2a6619b28
commit
9308d9a74a
1 changed files with 2 additions and 2 deletions
|
@ -4964,12 +4964,12 @@ DEFUN ("comp--compile-ctxt-to-file", Fcomp__compile_ctxt_to_file,
|
|||
struct Lisp_Hash_Table *func_h =
|
||||
XHASH_TABLE (CALL1I (comp-ctxt-funcs-h, Vcomp_ctxt));
|
||||
for (ptrdiff_t i = 0; i < HASH_TABLE_SIZE (func_h); i++)
|
||||
if (!BASE_EQ (HASH_VALUE (func_h, i), Qunbound))
|
||||
if (!BASE_EQ (HASH_KEY (func_h, i), Qunbound))
|
||||
declare_function (HASH_VALUE (func_h, i));
|
||||
/* Compile all functions. Can't be done before because the
|
||||
relocation structs has to be already defined. */
|
||||
for (ptrdiff_t i = 0; i < HASH_TABLE_SIZE (func_h); i++)
|
||||
if (!BASE_EQ (HASH_VALUE (func_h, i), Qunbound))
|
||||
if (!BASE_EQ (HASH_KEY (func_h, i), Qunbound))
|
||||
compile_function (HASH_VALUE (func_h, i));
|
||||
|
||||
/* Work around bug#46495 (GCC PR99126). */
|
||||
|
|
Loading…
Add table
Reference in a new issue