long xdl_atol(char const *str, char const **next) {
  long val, base;
  char const *top;
  for (top = str; ((*top) >= '0' && (*top) <= '9'); top++)
    ;
  if (next)
    *next = top;
  for (val = 0, base = 1, top--; top >= str; top--, base *= 10)
    val += base * (long)(*top - '0');
  return val;
}


x86 assembly (clang, -O0):
<xdl_atol>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x30,%ecx
mov    %al,-0x29(%rbp)
jl     1139 <xdl_atol+0x39>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x39,%eax
setle  %al
mov    %al,-0x29(%rbp)
mov    -0x29(%rbp),%al
test   $0x1,%al
jne    1149 <xdl_atol+0x49>
jmp    115f <xdl_atol+0x5f>
jmp    114e <xdl_atol+0x4e>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    1114 <xdl_atol+0x14>
cmpq   $0x0,-0x10(%rbp)
je     1175 <xdl_atol+0x75>
mov    -0x28(%rbp),%rcx
mov    -0x10(%rbp),%rax
mov    %rcx,(%rax)
movq   $0x0,-0x18(%rbp)
movq   $0x1,-0x20(%rbp)
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x8(%rbp),%rax
jb     11d6 <xdl_atol+0xd6>
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
movsbl (%rcx),%ecx
sub    $0x30,%ecx
movslq %ecx,%rcx
imul   %rcx,%rax
add    -0x18(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
imul   $0xa,-0x20(%rbp),%rax
mov    %rax,-0x20(%rbp)
jmp    1191 <xdl_atol+0x91>
mov    -0x18(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<xdl_atol>:
lea    -0x1(%rdi),%rcx
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movzbl 0x1(%rcx),%eax
add    $0x1,%rcx
add    $0xd0,%al
cmp    $0xa,%al
jb     1110 <xdl_atol+0x10>
test   %rsi,%rsi
je     1126 <xdl_atol+0x26>
mov    %rcx,(%rsi)
add    $0xffffffffffffffff,%rcx
cmp    %rdi,%rcx
jae    1132 <xdl_atol+0x32>
xor    %eax,%eax
ret
mov    $0x1,%edx
xor    %eax,%eax
nopl   0x0(%rax)
movsbq (%rcx),%rsi
add    $0xffffffffffffffd0,%rsi
imul   %rdx,%rsi
add    %rsi,%rax
add    %rdx,%rdx
lea    (%rdx,%rdx,4),%rdx
add    $0xffffffffffffffff,%rcx
cmp    %rdi,%rcx
jae    1140 <xdl_atol+0x40>
ret

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

LLVM IR (-O2):
define i64 @xdl_atol(i8* %0, i8** writeonly %1) {
br label %3
3: ; preds = %3, %2
%4 = phi i8* [ %0, %2 ], [ %8, %3 ]
%5 = load i8, i8* %4
%6 = add i8 %5, -48
%7 = icmp ult i8 %6, 10
%8 = getelementptr inbounds i8, i8* %4, i64 1
br i1 %7, label %3, label %9
9: ; preds = %3
%10 = icmp eq i8** %1, null
br i1 %10, label %12, label %11
11: ; preds = %9
store i8* %4, i8** %1
br label %12
12: ; preds = %11, %9
%13 = getelementptr inbounds i8, i8* %4, i64 -1
%14 = icmp ult i8* %13, %0
br i1 %14, label %27, label %15
15: ; preds = %12, %15
%16 = phi i8* [ %25, %15 ], [ %13, %12 ]
%17 = phi i64 [ %24, %15 ], [ 1, %12 ]
%18 = phi i64 [ %23, %15 ], [ 0, %12 ]
%19 = load i8, i8* %16
%20 = sext i8 %19 to i64
%21 = add nsw i64 %20, -48
%22 = mul nsw i64 %21, %17
%23 = add nsw i64 %22, %18
%24 = mul nsw i64 %17, 10
%25 = getelementptr inbounds i8, i8* %16, i64 -1
%26 = icmp ult i8* %25, %0
br i1 %26, label %27, label %15
27: ; preds = %15, %12
%28 = phi i64 [ 0, %12 ], [ %23, %15 ]
ret i64 %28
}