int KeywordHash_Key(char *keyword) {
  int register hash, i;
  hash = 0;
  for (i = 0; keyword[i] != '\0'; i++) {
    if (keyword[i] >= 'A' && keyword[i] <= 'Z')
      hash += (keyword[i] + ('a' - 'A')) * (119 + i);
    else
      hash += keyword[i] * (119 + i);
  }
  hash = (hash ^ (hash >> 10) ^ (hash >> 20)) & (512 - 1);
  return hash;
}


x86 assembly (clang, -O0):
<KeywordHash_Key>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movl   $0x0,-0xc(%rbp)
movl   $0x0,-0x10(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x0,%eax
je     11a6 <KeywordHash_Key+0xa6>
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x41,%eax
jl     1178 <KeywordHash_Key+0x78>
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x5a,%eax
jg     1178 <KeywordHash_Key+0x78>
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
add    $0x20,%eax
mov    -0x10(%rbp),%ecx
add    $0x77,%ecx
imul   %ecx,%eax
add    -0xc(%rbp),%eax
mov    %eax,-0xc(%rbp)
jmp    1193 <KeywordHash_Key+0x93>
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
mov    -0x10(%rbp),%ecx
add    $0x77,%ecx
imul   %ecx,%eax
add    -0xc(%rbp),%eax
mov    %eax,-0xc(%rbp)
jmp    1198 <KeywordHash_Key+0x98>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1116 <KeywordHash_Key+0x16>
mov    -0xc(%rbp),%eax
mov    -0xc(%rbp),%ecx
sar    $0xa,%ecx
xor    %ecx,%eax
mov    -0xc(%rbp),%ecx
sar    $0x14,%ecx
xor    %ecx,%eax
and    $0x1ff,%eax
mov    %eax,-0xc(%rbp)
mov    -0xc(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<KeywordHash_Key>:
mov    (%rdi),%dl
xor    %eax,%eax
test   %dl,%dl
je     113b <KeywordHash_Key+0x3b>
mov    $0x1,%ecx
nopl   (%rax)
movsbl %dl,%edx
lea    -0x41(%rdx),%r8d
lea    0x20(%rdx),%esi
lea    0x76(%rcx),%r9d
cmp    $0x1a,%r8b
cmovb  %r9d,%edx
cmovae %r9d,%esi
imul   %edx,%esi
add    %esi,%eax
movzbl (%rdi,%rcx,1),%edx
add    $0x1,%rcx
test   %dl,%dl
jne    1110 <KeywordHash_Key+0x10>
mov    %eax,%ecx
shr    $0xa,%ecx
xor    %eax,%ecx
shr    $0x14,%eax
xor    %ecx,%eax
and    $0x1ff,%eax
ret

LLVM IR (-O0):
define i32 @KeywordHash_Key(i8* %0) {
%2 = alloca i8*
%3 = alloca i32
%4 = alloca i32
store i8* %0, i8** %2
store i32 0, i32* %3
store i32 0, i32* %4
br label %5
5: ; preds = %55, %1
%6 = load i8*, i8** %2
%7 = load i32, i32* %4
%8 = sext i32 %7 to i64
%9 = getelementptr inbounds i8, i8* %6, i64 %8
%10 = load i8, i8* %9
%11 = sext i8 %10 to i32
%12 = icmp ne i32 %11, 0
br i1 %12, label %13, label %58
13: ; preds = %5
%14 = load i8*, i8** %2
%15 = load i32, i32* %4
%16 = sext i32 %15 to i64
%17 = getelementptr inbounds i8, i8* %14, i64 %16
%18 = load i8, i8* %17
%19 = sext i8 %18 to i32
%20 = icmp sge i32 %19, 65
br i1 %20, label %21, label %42
21: ; preds = %13
%22 = load i8*, i8** %2
%23 = load i32, i32* %4
%24 = sext i32 %23 to i64
%25 = getelementptr inbounds i8, i8* %22, i64 %24
%26 = load i8, i8* %25
%27 = sext i8 %26 to i32
%28 = icmp sle i32 %27, 90
br i1 %28, label %29, label %42
29: ; preds = %21
%30 = load i8*, i8** %2
%31 = load i32, i32* %4
%32 = sext i32 %31 to i64
%33 = getelementptr inbounds i8, i8* %30, i64 %32
%34 = load i8, i8* %33
%35 = sext i8 %34 to i32
%36 = add nsw i32 %35, 32
%37 = load i32, i32* %4
%38 = add nsw i32 119, %37
%39 = mul nsw i32 %36, %38
%40 = load i32, i32* %3
%41 = add nsw i32 %40, %39
store i32 %41, i32* %3
br label %54
42: ; preds = %21, %13
%43 = load i8*, i8** %2
%44 = load i32, i32* %4
%45 = sext i32 %44 to i64
%46 = getelementptr inbounds i8, i8* %43, i64 %45
%47 = load i8, i8* %46
%48 = sext i8 %47 to i32
%49 = load i32, i32* %4
%50 = add nsw i32 119, %49
%51 = mul nsw i32 %48, %50
%52 = load i32, i32* %3
%53 = add nsw i32 %52, %51
store i32 %53, i32* %3
br label %54
54: ; preds = %42, %29
br label %55
55: ; preds = %54
%56 = load i32, i32* %4
%57 = add nsw i32 %56, 1
store i32 %57, i32* %4
br label %5
58: ; preds = %5
%59 = load i32, i32* %3
%60 = load i32, i32* %3
%61 = ashr i32 %60, 10
%62 = xor i32 %59, %61
%63 = load i32, i32* %3
%64 = ashr i32 %63, 20
%65 = xor i32 %62, %64
%66 = and i32 %65, 511
store i32 %66, i32* %3
%67 = load i32, i32* %3
ret i32 %67
}

LLVM IR (-O2):
define i32 @KeywordHash_Key(i8* nocapture %0) {
%2 = load i8, i8* %0
%3 = icmp eq i8 %2, 0
br i1 %3, label %24, label %4
4: ; preds = %1, %4
%5 = phi i64 [ %20, %4 ], [ 0, %1 ]
%6 = phi i8 [ %22, %4 ], [ %2, %1 ]
%7 = phi i32 [ %19, %4 ], [ 0, %1 ]
%8 = sext i8 %6 to i32
%9 = add i8 %6, -65
%10 = icmp ult i8 %9, 26
%11 = add nsw i32 %8, 32
%12 = trunc i64 %5 to i32
%13 = add i32 %12, 119
%14 = trunc i64 %5 to i32
%15 = add i32 %14, 119
%16 = select i1 %10, i32 %13, i32 %8
%17 = select i1 %10, i32 %11, i32 %15
%18 = mul nsw i32 %17, %16
%19 = add nsw i32 %18, %7
%20 = add nuw i64 %5, 1
%21 = getelementptr inbounds i8, i8* %0, i64 %20
%22 = load i8, i8* %21
%23 = icmp eq i8 %22, 0
br i1 %23, label %24, label %4
24: ; preds = %4, %1
%25 = phi i32 [ 0, %1 ], [ %19, %4 ]
%26 = lshr i32 %25, 10
%27 = xor i32 %26, %25
%28 = lshr i32 %25, 20
%29 = xor i32 %27, %28
%30 = and i32 %29, 511
ret i32 %30
}