commit: Document non-obvious usages.

changeset: 4587:871eb054b34a021924f195dc208af255505350cd user: Stephen J. Turnbull <stephen(a)xemacs.org&gt; date: Tue Nov 25 10:44:16 2008 +0900 files: src/ChangeLog src/elhash.c description: Document non-obvious usages. diff -r 56e67d42eb04dc62fd3c8d5950209f941e0f21ee -r 871eb054b34a021924f195dc208af255505350cd src/ChangeLog --- a/src/ChangeLog Thu Nov 20 23:59:52 2008 +0900 +++ b/src/ChangeLog Tue Nov 25 10:44:16 2008 +0900 ＠＠ -136,6 +136,13 ＠＠ 2008-11-02 Stephen J. Turnbull <stephe * input-method-xlib.c: Use Xt_RESOURCE. + +2008-11-25 Stephen J. Turnbull <stephen(a)xemacs.org&gt; + + * elhash.c (hash_table_data_validate): + * elhash.c (decode_hash_table_rehash_size): + * elhash.c (decode_hash_table_rehash_threshold): + Document side effects used in these functions. 2008-11-20 Stephen J. Turnbull <stephen(a)xemacs.org&gt; diff -r 56e67d42eb04dc62fd3c8d5950209f941e0f21ee -r 871eb054b34a021924f195dc208af255505350cd src/elhash.c --- a/src/elhash.c Thu Nov 20 23:59:52 2008 +0900 +++ b/src/elhash.c Tue Nov 25 10:44:16 2008 +0900 ＠＠ -755,6 +755,7 ＠＠ static double static double decode_hash_table_rehash_size (Lisp_Object rehash_size) { + /* -1.0 signals make_general_lisp_hash_table to use the default. */ return NILP (rehash_size) ? -1.0 : XFLOAT_DATA (rehash_size); } ＠＠ -786,6 +787,7 ＠＠ static double static double decode_hash_table_rehash_threshold (Lisp_Object rehash_threshold) { + /* -1.0 signals make_general_lisp_hash_table to use the default. */ return NILP (rehash_threshold) ? -1.0 : XFLOAT_DATA (rehash_threshold); } ＠＠ -795,6 +797,7 ＠＠ hash_table_data_validate (Lisp_Object UN { int len; + /* Check for improper lists while getting length. */ GET_EXTERNAL_LIST_LENGTH (value, len); if (len & 1) ＠＠ -804,6 +807,7 ＠＠ hash_table_data_validate (Lisp_Object UN value, Qhash_table, errb); return 0; } + return 1; } _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches