int wordhash(const char *const word) {
  const char *p = word;
  char c = (*p);
  int total = 0;
  while (c != '\0') {
    if (c > 'Z') {
      if (c >= 'a' && c <= 'z')
        c -= 32;
      else
        goto next;
    } else if (c < 'A')
      goto next;
    total += (1 << (c - 65));
  next:
    ++p;
    c = (*p);
  }
  return total;
}


x86 assembly (clang, -O0):
<wordhash>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%al
mov    %al,-0x11(%rbp)
movl   $0x0,-0x18(%rbp)
movsbl -0x11(%rbp),%eax
cmp    $0x0,%eax
je     11b2 <wordhash+0xb2>
movsbl -0x11(%rbp),%eax
cmp    $0x5a,%eax
jle    116d <wordhash+0x6d>
movsbl -0x11(%rbp),%eax
cmp    $0x61,%eax
jl     1163 <wordhash+0x63>
movsbl -0x11(%rbp),%eax
cmp    $0x7a,%eax
jg     1163 <wordhash+0x63>
movsbl -0x11(%rbp),%eax
sub    $0x20,%eax
mov    %al,-0x11(%rbp)
jmp    1168 <wordhash+0x68>
jmp    1198 <wordhash+0x98>
jmp    1184 <wordhash+0x84>
movsbl -0x11(%rbp),%eax
cmp    $0x41,%eax
jge    117f <wordhash+0x7f>
jmp    1198 <wordhash+0x98>
jmp    1184 <wordhash+0x84>
movsbl -0x11(%rbp),%ecx
sub    $0x41,%ecx
mov    $0x1,%eax
shl    %cl,%eax
add    -0x18(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%al
mov    %al,-0x11(%rbp)
jmp    1120 <wordhash+0x20>
mov    -0x18(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<wordhash>:
mov    (%rdi),%cl
test   %cl,%cl
je     1148 <wordhash+0x48>
add    $0x1,%rdi
xor    %eax,%eax
jmp    1127 <wordhash+0x27>
xchg   %ax,%ax
add    $0xbf,%cl
mov    $0x1,%edx
shl    %cl,%edx
add    %edx,%eax
movzbl (%rdi),%ecx
add    $0x1,%rdi
test   %cl,%cl
je     1147 <wordhash+0x47>
cmp    $0x5b,%cl
jl     1140 <wordhash+0x40>
lea    -0x61(%rcx),%edx
cmp    $0x19,%dl
ja     111c <wordhash+0x1c>
add    $0xe0,%cl
jmp    1110 <wordhash+0x10>
nopl   0x0(%rax)
cmp    $0x41,%cl
jge    1110 <wordhash+0x10>
jmp    111c <wordhash+0x1c>
ret
xor    %eax,%eax
ret

LLVM IR (-O0):
define i32 @wordhash(i8* %0) {
%2 = alloca i8*
%3 = alloca i8*
%4 = alloca i8
%5 = alloca i32
store i8* %0, i8** %2
%6 = load i8*, i8** %2
store i8* %6, i8** %3
%7 = load i8*, i8** %3
%8 = load i8, i8* %7
store i8 %8, i8* %4
store i32 0, i32* %5
br label %9
9: ; preds = %45, %1
%10 = load i8, i8* %4
%11 = sext i8 %10 to i32
%12 = icmp ne i32 %11, 0
br i1 %12, label %13, label %50
13: ; preds = %9
%14 = load i8, i8* %4
%15 = sext i8 %14 to i32
%16 = icmp sgt i32 %15, 90
br i1 %16, label %17, label %32
17: ; preds = %13
%18 = load i8, i8* %4
%19 = sext i8 %18 to i32
%20 = icmp sge i32 %19, 97
br i1 %20, label %21, label %30
21: ; preds = %17
%22 = load i8, i8* %4
%23 = sext i8 %22 to i32
%24 = icmp sle i32 %23, 122
br i1 %24, label %25, label %30
25: ; preds = %21
%26 = load i8, i8* %4
%27 = sext i8 %26 to i32
%28 = sub nsw i32 %27, 32
%29 = trunc i32 %28 to i8
store i8 %29, i8* %4
br label %31
30: ; preds = %21, %17
br label %45
31: ; preds = %25
br label %38
32: ; preds = %13
%33 = load i8, i8* %4
%34 = sext i8 %33 to i32
%35 = icmp slt i32 %34, 65
br i1 %35, label %36, label %37
36: ; preds = %32
br label %45
37: ; preds = %32
br label %38
38: ; preds = %37, %31
%39 = load i8, i8* %4
%40 = sext i8 %39 to i32
%41 = sub nsw i32 %40, 65
%42 = shl i32 1, %41
%43 = load i32, i32* %5
%44 = add nsw i32 %43, %42
store i32 %44, i32* %5
br label %45
45: ; preds = %38, %36, %30
%46 = load i8*, i8** %3
%47 = getelementptr inbounds i8, i8* %46, i32 1
store i8* %47, i8** %3
%48 = load i8*, i8** %3
%49 = load i8, i8* %48
store i8 %49, i8* %4
br label %9
50: ; preds = %9
%51 = load i32, i32* %5
ret i32 %51
}

LLVM IR (-O2):
define i32 @wordhash(i8* nocapture %0) {
%2 = load i8, i8* %0
%3 = icmp eq i8 %2, 0
br i1 %3, label %27, label %4
4: ; preds = %1, %22
%5 = phi i8 [ %25, %22 ], [ %2, %1 ]
%6 = phi i32 [ %23, %22 ], [ 0, %1 ]
%7 = phi i8* [ %24, %22 ], [ %0, %1 ]
%8 = icmp sgt i8 %5, 90
br i1 %8, label %9, label %14
9: ; preds = %4
%10 = add nsw i8 %5, -97
%11 = icmp ult i8 %10, 26
br i1 %11, label %12, label %22
12: ; preds = %9
%13 = add nsw i8 %5, -32
br label %16
14: ; preds = %4
%15 = icmp slt i8 %5, 65
br i1 %15, label %22, label %16
16: ; preds = %14, %12
%17 = phi i8 [ %13, %12 ], [ %5, %14 ]
%18 = zext i8 %17 to i32
%19 = add nsw i32 %18, -65
%20 = shl nuw nsw i32 1, %19
%21 = add nsw i32 %20, %6
br label %22
22: ; preds = %14, %9, %16
%23 = phi i32 [ %21, %16 ], [ %6, %9 ], [ %6, %14 ]
%24 = getelementptr inbounds i8, i8* %7, i64 1
%25 = load i8, i8* %24
%26 = icmp eq i8 %25, 0
br i1 %26, label %27, label %4
27: ; preds = %22, %1
%28 = phi i32 [ 0, %1 ], [ %23, %22 ]
ret i32 %28
}