path: root/mdk-stage1/dietlibc/libdl/elf_hash.c

unsigned long elf_hash(const unsigned char *name)
{
  unsigned long h=0, g;

  while (*name)
  {
    h = (h<<4) + *(name++);
    if (g = h&0xf0000000) h ^= g>>24;
    h &= ~g;
  }
  return h;
}