Serialise non-default hash table rehash thresholds correctly; use this. src/ChangeLog addition: 2009-12-17 Aidan Kehoe <kehoea@parhasard.net> * elhash.c (HASH_TABLE_DEFAULT_REHASH_THRESHOLD): New macro, giving a default value for a hash table's rehash threshold given its size and test function. (print_hash_table): Print the hash table's rehash threshold if it has a non-default value. Ditto for its rehash size. (Fmake_hash_table): Supply the keyword arguments in a format understood by #'function-arglist. lisp/ChangeLog addition: 2009-12-17 Aidan Kehoe <kehoea@parhasard.net> * mule/make-coding-system.el (fixed-width-create-decode-encode-tables): Use a rehash threshold of 0.999 for this hash table, now that hash table rehash thresholds are serialised correctly; these hash tables will never be resized, and it's not even that important that they are *that* fast, for most of the coding systems they're used a minority of the time.

--- a/lisp/mule/make-coding-system.el	Thu Dec 17 13:15:04 2009 +0000
+++ b/lisp/mule/make-coding-system.el	Thu Dec 17 13:50:45 2009 +0000
@@ -322,7 +322,7 @@
 to 256 distinct characters."
   (check-argument-type #'listp unicode-map)
   (let ((decode-table (make-vector 256 nil))
-        (encode-table (make-hash-table :size 256))
+        (encode-table (make-hash-table :size 256 :rehash-threshold 0.999))
 	(private-use-start (encode-char fixed-width-private-use-start 'ucs))
         (invalid-sequence-code-point-start
          (eval-when-compile