long str2hl(const char *ss) {
  int x;
  long number;
  for (number = 0; *ss; ss++) {
    if (*ss >= 0x30 && *ss <= 0x39)
      x = *ss - 0x30;
    else if (*ss >= 0x41 && *ss <= 0x46)
      x = *ss - 0x41 + 10;
    else if (*ss >= 0x61 && *ss <= 0x66)
      x = *ss - 0x61 + 10;
    else
      return -1;
    number = (number << 4) | x;
  }
  return number;
}


x86 assembly (clang, -O0):
<str2hl>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
movq   $0x0,-0x20(%rbp)
mov    -0x10(%rbp),%rax
cmpb   $0x0,(%rax)
je     11f4 <str2hl+0xf4>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x30,%eax
jl     114f <str2hl+0x4f>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x39,%eax
jg     114f <str2hl+0x4f>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
sub    $0x30,%eax
mov    %eax,-0x14(%rbp)
jmp    11d0 <str2hl+0xd0>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x41,%eax
jl     1184 <str2hl+0x84>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x46,%eax
jg     1184 <str2hl+0x84>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
sub    $0x41,%eax
add    $0xa,%eax
mov    %eax,-0x14(%rbp)
jmp    11cb <str2hl+0xcb>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x61,%eax
jl     11b9 <str2hl+0xb9>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x66,%eax
jg     11b9 <str2hl+0xb9>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
sub    $0x61,%eax
add    $0xa,%eax
mov    %eax,-0x14(%rbp)
jmp    11c6 <str2hl+0xc6>
movq   $0xffffffffffffffff,-0x8(%rbp)
ff
jmp    11fc <str2hl+0xfc>
jmp    11cb <str2hl+0xcb>
jmp    11d0 <str2hl+0xd0>
mov    -0x20(%rbp),%rax
shl    $0x4,%rax
movslq -0x14(%rbp),%rcx
or     %rcx,%rax
mov    %rax,-0x20(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    1110 <str2hl+0x10>
mov    -0x20(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<str2hl>:
mov    (%rdi),%sil
test   %sil,%sil
je     1164 <str2hl+0x64>
mov    $0xffffffa9,%ecx
add    $0x1,%rdi
xor    %eax,%eax
lea    0x27(%rcx),%r9
lea    0x20(%rcx),%r8
jmp    1139 <str2hl+0x39>
nopl   (%rax)
movsbq %sil,%rdx
add    %edx,%ecx
shl    $0x4,%rax
or     %rcx,%rax
movzbl (%rdi),%esi
add    $0x1,%rdi
test   %sil,%sil
je     1163 <str2hl+0x63>
lea    -0x30(%rsi),%edx
mov    %r9,%rcx
cmp    $0xa,%dl
jb     1120 <str2hl+0x20>
lea    -0x41(%rsi),%edx
mov    %r8,%rcx
cmp    $0x6,%dl
jb     1120 <str2hl+0x20>
lea    -0x61(%rsi),%edx
mov    $0xffffffa9,%ecx
cmp    $0x5,%dl
jbe    1120 <str2hl+0x20>
mov    $0xffffffffffffffff,%rax
ret
xor    %eax,%eax
ret

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

LLVM IR (-O2):
define i64 @str2hl(i8* nocapture %0) {
%2 = load i8, i8* %0
%3 = icmp eq i8 %2, 0
br i1 %3, label %26, label %4
4: ; preds = %1, %17
%5 = phi i8 [ %24, %17 ], [ %2, %1 ]
%6 = phi i64 [ %22, %17 ], [ 0, %1 ]
%7 = phi i8* [ %23, %17 ], [ %0, %1 ]
%8 = sext i8 %5 to i64
%9 = add i8 %5, -48
%10 = icmp ult i8 %9, 10
br i1 %10, label %17, label %11
11: ; preds = %4
%12 = add i8 %5, -65
%13 = icmp ult i8 %12, 6
br i1 %13, label %17, label %14
14: ; preds = %11
%15 = add i8 %5, -97
%16 = icmp ult i8 %15, 6
br i1 %16, label %17, label %26
17: ; preds = %14, %11, %4
%18 = phi i64 [ 4294967248, %4 ], [ 4294967241, %11 ], [ 4294967209, %14 ]
%19 = add nsw i64 %18, %8
%20 = shl i64 %6, 4
%21 = and i64 %19, 4294967295
%22 = or i64 %21, %20
%23 = getelementptr inbounds i8, i8* %7, i64 1
%24 = load i8, i8* %23
%25 = icmp eq i8 %24, 0
br i1 %25, label %26, label %4
26: ; preds = %14, %17, %1
%27 = phi i64 [ 0, %1 ], [ %22, %17 ], [ -1, %14 ]
ret i64 %27
}