comparison src/fns.c @ 90596:6823a91487f2

Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 399-413) - Update from CVS - Rcirc update from Ryan Yeske - Merge from gnus--rel--5.10 - Miscellaneous tq-related fixes. * gnus--rel--5.10 (patch 126-127) - Merge from emacs--devo--0 - Update from CVS Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-105
author Miles Bader <miles@gnu.org>
date Mon, 28 Aug 2006 04:33:45 +0000
parents 858cb33ae39d 1ef51160f403
children c358d0861b16
comparison
equal deleted inserted replaced
90595:fd59c4164a14 90596:6823a91487f2
4400 while (p != end) 4400 while (p != end)
4401 { 4401 {
4402 c = *p++; 4402 c = *p++;
4403 if (c >= 0140) 4403 if (c >= 0140)
4404 c -= 40; 4404 c -= 40;
4405 hash = ((hash << 3) + (hash >> 28) + c); 4405 hash = ((hash << 4) + (hash >> 28) + c);
4406 } 4406 }
4407 4407
4408 return hash & INTMASK; 4408 return hash & INTMASK;
4409 } 4409 }
4410 4410