unsigned long hex_to_long(char *p) {
  unsigned long ret = 0;
  char tmp;
  while (*p) {
    tmp = *p;
    if (tmp >= 'a' && tmp <= 'f')
      tmp = 10 + tmp - 'a';
    else if (tmp >= 'A' && tmp <= 'F')
      tmp = 10 + tmp - 'A';
    else
      tmp = tmp - '0';
    ret = ret * 16 + tmp;
    p++;
  }
  return ret;
}


x86 assembly (clang, -O0):
<hex_to_long>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movq   $0x0,-0x10(%rbp)
mov    -0x8(%rbp),%rax
cmpb   $0x0,(%rax)
je     11b2 <hex_to_long+0xb2>
mov    -0x8(%rbp),%rax
mov    (%rax),%al
mov    %al,-0x11(%rbp)
movsbl -0x11(%rbp),%eax
cmp    $0x61,%eax
jl     1152 <hex_to_long+0x52>
movsbl -0x11(%rbp),%eax
cmp    $0x66,%eax
jg     1152 <hex_to_long+0x52>
movsbl -0x11(%rbp),%eax
add    $0xa,%eax
sub    $0x61,%eax
mov    %al,-0x11(%rbp)
jmp    118d <hex_to_long+0x8d>
movsbl -0x11(%rbp),%eax
cmp    $0x41,%eax
jl     117e <hex_to_long+0x7e>
movsbl -0x11(%rbp),%eax
cmp    $0x46,%eax
jg     117e <hex_to_long+0x7e>
movsbl -0x11(%rbp),%eax
add    $0xa,%eax
sub    $0x41,%eax
mov    %al,-0x11(%rbp)
jmp    1188 <hex_to_long+0x88>
movsbl -0x11(%rbp),%eax
sub    $0x30,%eax
mov    %al,-0x11(%rbp)
jmp    118d <hex_to_long+0x8d>
mov    -0x10(%rbp),%rax
shl    $0x4,%rax
movsbq -0x11(%rbp),%rcx
add    %rcx,%rax
mov    %rax,-0x10(%rbp)
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    1110 <hex_to_long+0x10>
mov    -0x10(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<hex_to_long>:
mov    (%rdi),%cl
test   %cl,%cl
je     115a <hex_to_long+0x5a>
add    $0x1,%rdi
xor    %eax,%eax
mov    $0xa9,%r8d
jmp    1140 <hex_to_long+0x40>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
cmp    $0x6,%r9b
cmovb  %r8d,%edx
add    %dl,%cl
shl    $0x4,%rax
movsbq %cl,%rcx
add    %rcx,%rax
movzbl (%rdi),%ecx
add    $0x1,%rdi
test   %cl,%cl
je     1159 <hex_to_long+0x59>
lea    -0x61(%rcx),%r9d
lea    -0x41(%rcx),%esi
mov    $0xc9,%edx
cmp    $0x6,%sil
jb     1120 <hex_to_long+0x20>
mov    $0xd0,%edx
jmp    1120 <hex_to_long+0x20>
ret
xor    %eax,%eax
ret

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

LLVM IR (-O2):
define i64 @hex_to_long(i8* nocapture %0) {
%2 = load i8, i8* %0
%3 = icmp eq i8 %2, 0
br i1 %3, label %21, label %4
4: ; preds = %1, %4
%5 = phi i8 [ %19, %4 ], [ %2, %1 ]
%6 = phi i64 [ %17, %4 ], [ 0, %1 ]
%7 = phi i8* [ %18, %4 ], [ %0, %1 ]
%8 = add i8 %5, -97
%9 = icmp ult i8 %8, 6
%10 = add i8 %5, -65
%11 = icmp ult i8 %10, 6
%12 = select i1 %11, i8 -55, i8 -48
%13 = select i1 %9, i8 -87, i8 %12
%14 = add i8 %5, %13
%15 = shl i64 %6, 4
%16 = sext i8 %14 to i64
%17 = add i64 %15, %16
%18 = getelementptr inbounds i8, i8* %7, i64 1
%19 = load i8, i8* %18
%20 = icmp eq i8 %19, 0
br i1 %20, label %21, label %4
21: ; preds = %4, %1
%22 = phi i64 [ 0, %1 ], [ %17, %4 ]
ret i64 %22
}