Mercurial > hg > xemacs-beta
diff src/specifier.c @ 2515:de9952d2ed18
[xemacs-hg @ 2005-01-26 10:22:19 by ben]
Hash table cleanups, part 1 of 2
emacs-marshals.c, hash.c, hash.h, ui-gtk.c: Clean up and generalize creation of string hash tables.
ui-gtk.c, elhash.h, gccache-gtk.c, glyphs-gtk.c, lrecord.h, marker.c, objects-gtk.c, objects-msw.c, objects-tty.c, objects-x.c, objects.c, opaque.c, rangetab.c, specifier.c, specifier.h, xgccache.c: Use Hashcode rather than unsigned long.
| author | ben |
|---|---|
| date | Wed, 26 Jan 2005 10:22:29 +0000 |
| parents | 3d8143fc88e1 |
| children | 9f70af3ac939 |
line wrap: on
line diff
--- a/src/specifier.c Wed Jan 26 10:09:20 2005 +0000 +++ b/src/specifier.c Wed Jan 26 10:22:29 2005 +0000 @@ -337,7 +337,7 @@ return retval; } -static unsigned long +static Hashcode specifier_hash (Lisp_Object obj, int depth) { Lisp_Specifier *s = XSPECIFIER (obj); @@ -347,7 +347,7 @@ the most likely places where interesting stuff will be. */ return HASH5 ((HAS_SPECMETH_P (s, hash) ? SPECMETH (s, hash, (obj, depth)) : 0), - (unsigned long) s->methods, + (Hashcode) s->methods, internal_hash (s->global_specs, depth + 1), internal_hash (s->frame_specs, depth + 1), internal_hash (s->buffer_specs, depth + 1));