home *** CD-ROM | disk | FTP | other *** search
/ Aminet 10 / aminetcdnumber101996.iso / Aminet / util / gnu / groff_src.lha / groff-1.10src / libbib / common.cc next >
Text File  |  1995-06-22  |  1KB  |  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, 59 Temple Place - Suite 330, Boston, MA 02111-1307, 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.