long atol(const char *ptr) {
  long acc = 0;
  const char *s = ptr;
  int neg, c;
  while (*s == ' ' || *s == '\t')
    s++;
  if (*s == '-') {
    neg = 1;
    s++;
  } else {
    neg = 0;
    if (*s == '+')
      s++;
  }
  while (*s) {
    if (*s < '0' || *s > '9')
      break;
    c = *s - '0';
    acc = acc * 10 + c;
    s++;
  }
  if (neg)
    acc = -acc;
  return acc;
}


x86 assembly (clang, -O0):
<atol>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movq   $0x0,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
movsbl (%rax),%ecx
mov    $0x1,%al
cmp    $0x20,%ecx
mov    %al,-0x21(%rbp)
je     113d <atol+0x3d>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x9,%eax
sete   %al
mov    %al,-0x21(%rbp)
mov    -0x21(%rbp),%al
test   $0x1,%al
jne    114d <atol+0x4d>
jmp    115e <atol+0x5e>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    1118 <atol+0x18>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
jne    1186 <atol+0x86>
movl   $0x1,-0x1c(%rbp)
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    11ae <atol+0xae>
movl   $0x0,-0x1c(%rbp)
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2b,%eax
jne    11a9 <atol+0xa9>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    11ae <atol+0xae>
jmp    11b3 <atol+0xb3>
mov    -0x18(%rbp),%rax
cmpb   $0x0,(%rax)
je     1213 <atol+0x113>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x30,%eax
jl     11e0 <atol+0xe0>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x39,%eax
jle    11e5 <atol+0xe5>
jmp    1213 <atol+0x113>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
sub    $0x30,%eax
mov    %eax,-0x20(%rbp)
imul   $0xa,-0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
add    %rcx,%rax
mov    %rax,-0x10(%rbp)
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    11b3 <atol+0xb3>
cmpl   $0x0,-0x1c(%rbp)
je     1227 <atol+0x127>
xor    %eax,%eax
sub    -0x10(%rbp),%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<atol>:
lea    0xef9(%rip),%rax
nopw   0x0(%rax,%rax,1)
movzbl (%rdi),%ecx
add    $0xf7,%cl
cmp    $0x24,%cl
ja     1131 <atol+0x31>
movzbl %cl,%ecx
movslq (%rax,%rcx,4),%rcx
add    %rax,%rcx
jmp    *%rcx
add    $0x1,%rdi
jmp    1110 <atol+0x10>
add    $0x1,%rdi
mov    $0x1,%cl
jmp    113b <atol+0x3b>
add    $0x1,%rdi
xor    %ecx,%ecx
mov    (%rdi),%al
lea    -0x3a(%rax),%edx
cmp    $0xf6,%dl
jae    1149 <atol+0x49>
xor    %edx,%edx
jmp    116e <atol+0x6e>
add    $0x1,%rdi
xor    %edx,%edx
nop
movzbl %al,%eax
add    $0xffffffd0,%eax
lea    (%rdx,%rdx,4),%rdx
lea    (%rax,%rdx,2),%rdx
movzbl (%rdi),%eax
lea    -0x3a(%rax),%esi
add    $0x1,%rdi
cmp    $0xf5,%sil
ja     1150 <atol+0x50>
mov    %rdx,%rax
neg    %rax
test   %cl,%cl
cmovne %rdx,%rax
ret

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

LLVM IR (-O2):
define i64 @atol(i8* nocapture %0) {
br label %2
2: ; preds = %5, %1
%3 = phi i8* [ %0, %1 ], [ %6, %5 ]
%4 = load i8, i8* %3
switch i8 %4, label %11 [
i8 32, label %5
i8 9, label %5
i8 45, label %7
i8 43, label %9
]
5: ; preds = %2, %2
%6 = getelementptr inbounds i8, i8* %3, i64 1
br label %2
7: ; preds = %2
%8 = getelementptr inbounds i8, i8* %3, i64 1
br label %11
9: ; preds = %2
%10 = getelementptr inbounds i8, i8* %3, i64 1
br label %11
11: ; preds = %2, %9, %7
%12 = phi i8* [ %8, %7 ], [ %10, %9 ], [ %3, %2 ]
%13 = phi i1 [ false, %7 ], [ true, %9 ], [ true, %2 ]
%14 = load i8, i8* %12
%15 = add i8 %14, -58
%16 = icmp ult i8 %15, -10
br i1 %16, label %30, label %17
17: ; preds = %11, %17
%18 = phi i8 [ %27, %17 ], [ %14, %11 ]
%19 = phi i64 [ %25, %17 ], [ 0, %11 ]
%20 = phi i8* [ %26, %17 ], [ %12, %11 ]
%21 = zext i8 %18 to i64
%22 = add nuw nsw i64 %21, 4294967248
%23 = mul nsw i64 %19, 10
%24 = and i64 %22, 4294967295
%25 = add nsw i64 %24, %23
%26 = getelementptr inbounds i8, i8* %20, i64 1
%27 = load i8, i8* %26
%28 = add i8 %27, -58
%29 = icmp ult i8 %28, -10
br i1 %29, label %30, label %17
30: ; preds = %17, %11
%31 = phi i64 [ 0, %11 ], [ %25, %17 ]
%32 = sub nsw i64 0, %31
%33 = select i1 %13, i64 %31, i64 %32
ret i64 %33
}