getcol(p) char *p;
{
  register col;
  if (!p)
    return (0);
  while (*p && !isalpha(*p))
    p++;
  if (!*p)
    return (0);
  col = ((*p & 0137) - 'A');
  if (isalpha(*++p))
    col = (col + 1) * 26 + ((*p & 0137) - 'A');
  return (col);
}


x86 assembly (clang, -O0):
<getcol>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x10(%rbp)
cmpq   $0x0,-0x10(%rbp)
jne    1133 <getcol+0x23>
movl   $0x0,-0x4(%rbp)
jmp    11f0 <getcol+0xe0>
jmp    1138 <getcol+0x28>
mov    -0x10(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x15(%rbp)
je     1164 <getcol+0x54>
mov    -0x10(%rbp),%rax
movsbl (%rax),%edi
call   1030 <isalpha@plt>
cmp    $0x0,%eax
setne  %al
xor    $0xff,%al
mov    %al,-0x15(%rbp)
mov    -0x15(%rbp),%al
test   $0x1,%al
jne    1174 <getcol+0x64>
jmp    1185 <getcol+0x75>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    1138 <getcol+0x28>
mov    -0x10(%rbp),%rax
cmpb   $0x0,(%rax)
jne    119e <getcol+0x8e>
movl   $0x0,-0x4(%rbp)
jmp    11f0 <getcol+0xe0>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
and    $0x5f,%eax
sub    $0x41,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movsbl 0x1(%rax),%edi
call   1030 <isalpha@plt>
cmp    $0x0,%eax
je     11ea <getcol+0xda>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
imul   $0x1a,%eax,%eax
mov    -0x10(%rbp),%rcx
movsbl (%rcx),%ecx
and    $0x5f,%ecx
sub    $0x41,%ecx
add    %ecx,%eax
mov    %eax,-0x14(%rbp)
mov    -0x14(%rbp),%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<getcol>:
push   %rbp
push   %r14
push   %rbx
xor    %ebp,%ebp
test   %rdi,%rdi
je     117b <getcol+0x6b>
mov    %rdi,%rbx
mov    (%rdi),%r14b
test   %r14b,%r14b
je     117b <getcol+0x6b>
add    $0x1,%rbx
nopw   0x0(%rax,%rax,1)
movsbl %r14b,%edi
call   1030 <isalpha@plt>
test   %eax,%eax
jne    114c <getcol+0x3c>
movzbl (%rbx),%r14d
add    $0x1,%rbx
test   %r14b,%r14b
jne    1130 <getcol+0x20>
jmp    117b <getcol+0x6b>
and    $0x5f,%r14b
movzbl %r14b,%ebp
lea    -0x41(%rbp),%r14d
movsbl (%rbx),%ebx
mov    %ebx,%edi
call   1030 <isalpha@plt>
lea    0x0(%rbp,%rbp,4),%ecx
lea    (%rcx,%rcx,4),%ecx
add    %ebp,%ecx
and    $0x5f,%ebx
test   %eax,%eax
lea    -0x6c1(%rbx,%rcx,1),%ebp
cmove  %r14d,%ebp
mov    %ebp,%eax
pop    %rbx
pop    %r14
pop    %rbp
ret

LLVM IR (-O0):
define i32 @getcol(i8* %0) {
%2 = alloca i32
%3 = alloca i8*
%4 = alloca i32
store i8* %0, i8** %3
%5 = load i8*, i8** %3
%6 = icmp ne i8* %5, null
br i1 %6, label %8, label %7
7: ; preds = %1
store i32 0, i32* %2
br label %55
8: ; preds = %1
br label %9
9: ; preds = %23, %8
%10 = load i8*, i8** %3
%11 = load i8, i8* %10
%12 = sext i8 %11 to i32
%13 = icmp ne i32 %12, 0
br i1 %13, label %14, label %21
14: ; preds = %9
%15 = load i8*, i8** %3
%16 = load i8, i8* %15
%17 = sext i8 %16 to i32
%18 = call i32 @isalpha(i32 %17)
%19 = icmp ne i32 %18, 0
%20 = xor i1 %19, true
br label %21
21: ; preds = %14, %9
%22 = phi i1 [ false, %9 ], [ %20, %14 ]
br i1 %22, label %23, label %26
23: ; preds = %21
%24 = load i8*, i8** %3
%25 = getelementptr inbounds i8, i8* %24, i32 1
store i8* %25, i8** %3
br label %9
26: ; preds = %21
%27 = load i8*, i8** %3
%28 = load i8, i8* %27
%29 = icmp ne i8 %28, 0
br i1 %29, label %31, label %30
30: ; preds = %26
store i32 0, i32* %2
br label %55
31: ; preds = %26
%32 = load i8*, i8** %3
%33 = load i8, i8* %32
%34 = sext i8 %33 to i32
%35 = and i32 %34, 95
%36 = sub nsw i32 %35, 65
store i32 %36, i32* %4
%37 = load i8*, i8** %3
%38 = getelementptr inbounds i8, i8* %37, i32 1
store i8* %38, i8** %3
%39 = load i8, i8* %38
%40 = sext i8 %39 to i32
%41 = call i32 @isalpha(i32 %40)
%42 = icmp ne i32 %41, 0
br i1 %42, label %43, label %53
43: ; preds = %31
%44 = load i32, i32* %4
%45 = add nsw i32 %44, 1
%46 = mul nsw i32 %45, 26
%47 = load i8*, i8** %3
%48 = load i8, i8* %47
%49 = sext i8 %48 to i32
%50 = and i32 %49, 95
%51 = sub nsw i32 %50, 65
%52 = add nsw i32 %46, %51
store i32 %52, i32* %4
br label %53
53: ; preds = %43, %31
%54 = load i32, i32* %4
store i32 %54, i32* %2
br label %55
55: ; preds = %53, %30, %7
%56 = load i32, i32* %2
ret i32 %56
}

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