long int atol(const char *str) {
  long int result = 0;
  while (*str) {
    result = result * 10;
    if (*str < 48 || *str > 57) {
      return 0;
    }
    result += *str - '0';
    str++;
  }
  return result;
}


x86 assembly (clang, -O0):
<atol>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
movq   $0x0,-0x18(%rbp)
mov    -0x10(%rbp),%rax
cmpb   $0x0,(%rax)
je     1178 <atol+0x78>
imul   $0xa,-0x18(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x30,%eax
jl     1146 <atol+0x46>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x39,%eax
jle    1153 <atol+0x53>
movq   $0x0,-0x8(%rbp)
jmp    1180 <atol+0x80>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
sub    $0x30,%eax
cltq
add    -0x18(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    1110 <atol+0x10>
mov    -0x18(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<atol>:
mov    (%rdi),%cl
test   %cl,%cl
je     1132 <atol+0x32>
add    $0x1,%rdi
xor    %eax,%eax
nopl   0x0(%rax)
lea    -0x3a(%rcx),%edx
cmp    $0xf6,%dl
jb     1132 <atol+0x32>
lea    (%rax,%rax,4),%rax
movzbl %cl,%ecx
add    $0xffffffd0,%ecx
lea    (%rcx,%rax,2),%rax
movzbl (%rdi),%ecx
add    $0x1,%rdi
test   %cl,%cl
jne    1110 <atol+0x10>
ret
xor    %eax,%eax
ret

LLVM IR (-O0):
define i64 @atol(i8* %0) {
%2 = alloca i64
%3 = alloca i8*
%4 = alloca i64
store i8* %0, i8** %3
store i64 0, i64* %4
br label %5
5: ; preds = %22, %1
%6 = load i8*, i8** %3
%7 = load i8, i8* %6
%8 = icmp ne i8 %7, 0
br i1 %8, label %9, label %32
9: ; preds = %5
%10 = load i64, i64* %4
%11 = mul nsw i64 %10, 10
store i64 %11, i64* %4
%12 = load i8*, i8** %3
%13 = load i8, i8* %12
%14 = sext i8 %13 to i32
%15 = icmp slt i32 %14, 48
br i1 %15, label %21, label %16
16: ; preds = %9
%17 = load i8*, i8** %3
%18 = load i8, i8* %17
%19 = sext i8 %18 to i32
%20 = icmp sgt i32 %19, 57
br i1 %20, label %21, label %22
21: ; preds = %16, %9
store i64 0, i64* %2
br label %34
22: ; preds = %16
%23 = load i8*, i8** %3
%24 = load i8, i8* %23
%25 = sext i8 %24 to i32
%26 = sub nsw i32 %25, 48
%27 = sext i32 %26 to i64
%28 = load i64, i64* %4
%29 = add nsw i64 %28, %27
store i64 %29, i64* %4
%30 = load i8*, i8** %3
%31 = getelementptr inbounds i8, i8* %30, i32 1
store i8* %31, i8** %3
br label %5
32: ; preds = %5
%33 = load i64, i64* %4
store i64 %33, i64* %2
br label %34
34: ; preds = %32, %21
%35 = load i64, i64* %2
ret i64 %35
}

LLVM IR (-O2):
define i64 @atol(i8* nocapture %0) {
%2 = load i8, i8* %0
%3 = icmp eq i8 %2, 0
br i1 %3, label %19, label %4
4: ; preds = %1, %10
%5 = phi i8 [ %17, %10 ], [ %2, %1 ]
%6 = phi i64 [ %15, %10 ], [ 0, %1 ]
%7 = phi i8* [ %16, %10 ], [ %0, %1 ]
%8 = add i8 %5, -58
%9 = icmp ult i8 %8, -10
br i1 %9, label %19, label %10
10: ; preds = %4
%11 = zext i8 %5 to i64
%12 = mul nsw i64 %6, 10
%13 = add nuw nsw i64 %11, 4294967248
%14 = and i64 %13, 4294967295
%15 = add nsw i64 %14, %12
%16 = getelementptr inbounds i8, i8* %7, i64 1
%17 = load i8, i8* %16
%18 = icmp eq i8 %17, 0
br i1 %18, label %19, label %4
19: ; preds = %4, %10, %1
%20 = phi i64 [ 0, %1 ], [ %15, %10 ], [ 0, %4 ]
ret i64 %20
}