diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2019-07-22 18:33:39 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2019-07-22 18:34:16 -0700 |
| commit | 3f4a9a5a3b267fbc13a8bebc4295bbfadd6ff03e (patch) | |
| tree | 27b50199a92bcfc6668f38a63e6b5d20cce2760a /src/lisp.h | |
| parent | c34496d0b956abc9d1ad55daa53ba626138233f4 (diff) | |
| download | emacs-3f4a9a5a3b267fbc13a8bebc4295bbfadd6ff03e.tar.gz | |
Do not pdump user-defined hashtabs
* src/pdumper.c (dump_hash_table_stable_p):
Signal an error if a hash table has user-defined tests (Bug#36769).
* src/fns.c (hashfn_user_defined): Now extern.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lisp.h b/src/lisp.h index 9d37629bc46..e96fcfe94d3 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -3606,6 +3606,7 @@ EMACS_UINT hash_string (char const *, ptrdiff_t); EMACS_UINT sxhash (Lisp_Object, int); Lisp_Object hashfn_eql (Lisp_Object, struct Lisp_Hash_Table *); Lisp_Object hashfn_equal (Lisp_Object, struct Lisp_Hash_Table *); +Lisp_Object hashfn_user_defined (Lisp_Object, struct Lisp_Hash_Table *); Lisp_Object make_hash_table (struct hash_table_test, EMACS_INT, float, float, Lisp_Object, bool); ptrdiff_t hash_lookup (struct Lisp_Hash_Table *, Lisp_Object, Lisp_Object *); |