X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Felhash.c;h=9055e93836cc05f32feb10455134396f72949481;hb=bbf3133177a15f214e3d0060e168ed86dbeed8a2;hp=b034860f0bac2df5b2e84747730674ffd9a4ba76;hpb=efdb31fd4c8db81d2414c32d491f1bf994263c74;p=chise%2Fxemacs-chise.git.1 diff --git a/src/elhash.c b/src/elhash.c index b034860..9055e93 100644 --- a/src/elhash.c +++ b/src/elhash.c @@ -336,7 +336,7 @@ print_hash_table (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag) else if (ht->test_function == lisp_object_eql_equal) DO_NOTHING; else - abort (); + ABORT (); if (ht->count || !print_readably) { @@ -461,7 +461,7 @@ make_standard_lisp_hash_table (enum hash_table_test test, break; default: - abort (); + ABORT (); } return make_general_lisp_hash_table (hash_function, test_function, @@ -730,7 +730,7 @@ hash_table_instantiate (Lisp_Object plist) else if (EQ (key, Qdata)) data = value; else if (EQ (key, Qtype))/*obsolete*/ weakness = value; else - abort (); + ABORT (); } /* Create the hash table. */ @@ -809,7 +809,7 @@ Use Common Lisp style keywords to specify hash table properties. Keyword :test can be `eq', `eql' (default) or `equal'. Comparison between keys is done using this function. If speed is important, consider using `eq'. -When storing strings in the hash table, you will likely need to use `equal'. +When hash table keys may be strings, you will likely need to use `equal'. Keyword :size specifies the number of keys likely to be inserted. This number of entries can be inserted without enlarging the hash table.