home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 4 / FreshFish_May-June1994.bin / bbs / gnu / groff-1.09-src.lha / src / amiga / groff-1.09 / libbib / common.cc next >
Encoding:
Text File  |  1992-08-03  |  1.0 KB  |  39 lines
  1. /* Copyright (C) 1989, 1990, 1991, 1992 Free Software Foundation, Inc.
  2.      Written by James Clark (jjc@jclark.com)
  3.  
  4. This file is part of groff.
  5.  
  6. groff is free software; you can redistribute it and/or modify it under
  7. the terms of the GNU General Public License as published by the Free
  8. Software Foundation; either version 2, or (at your option) any later
  9. version.
  10.  
  11. groff is distributed in the hope that it will be useful, but WITHOUT ANY
  12. WARRANTY; without even the implied warranty of MERCHANTABILITY or
  13. FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  14. for more details.
  15.  
  16. You should have received a copy of the GNU General Public License along
  17. with groff; see the file COPYING.  If not, write to the Free Software
  18. Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
  19.  
  20. unsigned hash(const char *s, int len)
  21. {
  22. #if 0
  23.   unsigned h = 0, g;
  24.   while (*s != '\0') {
  25.     h <<= 4;
  26.     h += *s++;
  27.     if ((g = h & 0xf0000000) != 0) {
  28.       h ^= g >> 24;
  29.       h ^= g;
  30.     }
  31.   }
  32. #endif
  33.   unsigned h = 0;
  34.   while (--len >= 0)
  35.     h = *s++ + 65587*h;
  36.   return h;
  37. }
  38.  
  39.