long atol(char *p) {
  long n;
  int f;
  n = 0;
  f = 0;
  for (;; p++) {
    switch (*p) {
    case ' ':
    case '\t':
      continue;
    case '-':
      f++;
    case '+':
      p++;
    }
    break;
  }
  while (*p >= '0' && *p <= '9') {
    n = n * 10 + *p++ - '0';
  }
  return (f ? -n : n);
}


x86 assembly (clang, -O0):
<atol>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movq   $0x0,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
add    $0xfffffff7,%eax
mov    %eax,%ecx
mov    %rcx,-0x20(%rbp)
sub    $0x24,%eax
ja     115e <atol+0x5e>
mov    -0x20(%rbp),%rax
lea    0xec5(%rip),%rcx
movslq (%rcx,%rax,4),%rax
add    %rcx,%rax
jmp    *%rax
jmp    1163 <atol+0x63>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    1174 <atol+0x74>
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    1117 <atol+0x17>
jmp    1179 <atol+0x79>
mov    -0x8(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x30,%ecx
mov    %al,-0x21(%rbp)
jl     119e <atol+0x9e>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x39,%eax
setle  %al
mov    %al,-0x21(%rbp)
mov    -0x21(%rbp),%al
test   $0x1,%al
jne    11ae <atol+0xae>
jmp    11d6 <atol+0xd6>
imul   $0xa,-0x10(%rbp),%rax
mov    -0x8(%rbp),%rcx
mov    %rcx,%rdx
add    $0x1,%rdx
mov    %rdx,-0x8(%rbp)
movsbq (%rcx),%rcx
add    %rcx,%rax
sub    $0x30,%rax
mov    %rax,-0x10(%rbp)
jmp    1179 <atol+0x79>
cmpl   $0x0,-0x14(%rbp)
je     11ef <atol+0xef>
xor    %eax,%eax
sub    -0x10(%rbp),%rax
mov    %rax,-0x30(%rbp)
jmp    11f7 <atol+0xf7>
mov    -0x10(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<atol>:
add    $0x1,%rdi
lea    0xef5(%rip),%rcx
nopl   0x0(%rax,%rax,1)
movsbl -0x1(%rdi),%eax
lea    -0x9(%rax),%edx
cmp    $0x24,%edx
ja     112b <atol+0x2b>
movslq (%rcx,%rdx,4),%rdx
add    %rcx,%rdx
jmp    *%rdx
add    $0x1,%rdi
jmp    1110 <atol+0x10>
add    $0xffffffffffffffff,%rdi
xor    %ecx,%ecx
jmp    113e <atol+0x3e>
xor    %ecx,%ecx
jmp    113c <atol+0x3c>
mov    $0x1,%ecx
mov    (%rdi),%al
lea    -0x30(%rax),%edx
cmp    $0x9,%dl
ja     1171 <atol+0x71>
add    $0x1,%rdi
xor    %edx,%edx
nopl   0x0(%rax)
lea    (%rdx,%rdx,4),%rdx
movzbl %al,%eax
lea    (%rax,%rdx,2),%rdx
add    $0xffffffffffffffd0,%rdx
movzbl (%rdi),%eax
lea    -0x30(%rax),%esi
add    $0x1,%rdi
cmp    $0xa,%sil
jb     1150 <atol+0x50>
jmp    1173 <atol+0x73>
xor    %edx,%edx
mov    %rdx,%rax
neg    %rax
test   %ecx,%ecx
cmove  %rdx,%rax
ret

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

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