void number(str, base, pl, ps) char *str;
int base;
long *pl;
int *ps;
{
  int up = '0' + base - 1;
  long val = 0;
  *ps = ((*str == '-' || *str == '+') ? ((*str++ == '-') ? -1 : 1) : 0);
  while (*str >= '0' && *str <= up)
    val = base * val + *str++ - '0';
  if (*str)
    fatal("syntax error: illegal numeric value", "");
  *pl = val;
}


x86 assembly (clang, -O0):
<number>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    -0xc(%rbp),%eax
add    $0x30,%eax
sub    $0x1,%eax
mov    %eax,-0x24(%rbp)
movq   $0x0,-0x30(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
je     115b <number+0x4b>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2b,%eax
jne    1185 <number+0x75>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
movsbl (%rax),%edx
mov    $0x1,%eax
mov    $0xffffffff,%ecx
cmp    $0x2d,%edx
cmove  %ecx,%eax
mov    %eax,-0x34(%rbp)
jmp    118f <number+0x7f>
xor    %eax,%eax
mov    %eax,-0x34(%rbp)
jmp    118f <number+0x7f>
mov    -0x34(%rbp),%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x8(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x30,%ecx
mov    %al,-0x35(%rbp)
jl     11bd <number+0xad>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    -0x24(%rbp),%eax
setle  %al
mov    %al,-0x35(%rbp)
mov    -0x35(%rbp),%al
test   $0x1,%al
jne    11cd <number+0xbd>
jmp    11f9 <number+0xe9>
movslq -0xc(%rbp),%rax
imul   -0x30(%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,-0x30(%rbp)
jmp    1198 <number+0x88>
mov    -0x8(%rbp),%rax
cmpb   $0x0,(%rax)
je     121b <number+0x10b>
lea    0xdf3(%rip),%rdi
lea    0xe0f(%rip),%rsi
mov    $0x0,%al
call   1030 <fatal@plt>
mov    -0x30(%rbp),%rcx
mov    -0x18(%rbp),%rax
mov    %rcx,(%rax)
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<number>:
push   %r14
push   %rbx
push   %rax
mov    %rdx,%r14
mov    (%rdi),%dl
cmp    $0x2d,%dl
je     1125 <number+0x15>
xor    %eax,%eax
cmp    $0x2b,%dl
jne    1136 <number+0x26>
add    $0x1,%rdi
xor    %eax,%eax
cmp    $0x2d,%dl
setne  %al
add    %eax,%eax
add    $0xffffffff,%eax
mov    %eax,(%rcx)
movsbl (%rdi),%eax
xor    %ebx,%ebx
cmp    $0x30,%eax
jl     117e <number+0x6e>
lea    0x2f(%rsi),%ecx
cmp    %eax,%ecx
jl     117e <number+0x6e>
movslq %esi,%rdx
add    $0x1,%rdi
xor    %ebx,%ebx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
imul   %rdx,%rbx
movzbl %al,%eax
add    %rax,%rbx
add    $0xffffffffffffffd0,%rbx
movsbl (%rdi),%eax
cmp    $0x30,%eax
jl     117e <number+0x6e>
add    $0x1,%rdi
cmp    %eax,%ecx
jge    1160 <number+0x50>
test   %al,%al
je     1197 <number+0x87>
lea    0xe77(%rip),%rdi
lea    0xe93(%rip),%rsi
xor    %eax,%eax
call   1030 <fatal@plt>
mov    %rbx,(%r14)
add    $0x8,%rsp
pop    %rbx
pop    %r14
ret

LLVM IR (-O0):
@.str = [36 x i8] c"syntax error: illegal numeric value\00"
@.str.1 = [1 x i8] zeroinitializer
define void @number(i8* %0, i32 %1, i64* %2, i32* %3) {
%5 = alloca i8*
%6 = alloca i32
%7 = alloca i64*
%8 = alloca i32*
%9 = alloca i32
%10 = alloca i64
store i8* %0, i8** %5
store i32 %1, i32* %6
store i64* %2, i64** %7
store i32* %3, i32** %8
%11 = load i32, i32* %6
%12 = add nsw i32 48, %11
%13 = sub nsw i32 %12, 1
store i32 %13, i32* %9
store i64 0, i64* %10
%14 = load i8*, i8** %5
%15 = load i8, i8* %14
%16 = sext i8 %15 to i32
%17 = icmp eq i32 %16, 45
br i1 %17, label %23, label %18
18: ; preds = %4
%19 = load i8*, i8** %5
%20 = load i8, i8* %19
%21 = sext i8 %20 to i32
%22 = icmp eq i32 %21, 43
br i1 %22, label %23, label %31
23: ; preds = %18, %4
%24 = load i8*, i8** %5
%25 = getelementptr inbounds i8, i8* %24, i32 1
store i8* %25, i8** %5
%26 = load i8, i8* %24
%27 = sext i8 %26 to i32
%28 = icmp eq i32 %27, 45
%29 = zext i1 %28 to i64
%30 = select i1 %28, i32 -1, i32 1
br label %32
31: ; preds = %18
br label %32
32: ; preds = %31, %23
%33 = phi i32 [ %30, %23 ], [ 0, %31 ]
%34 = load i32*, i32** %8
store i32 %33, i32* %34
br label %35
35: ; preds = %48, %32
%36 = load i8*, i8** %5
%37 = load i8, i8* %36
%38 = sext i8 %37 to i32
%39 = icmp sge i32 %38, 48
br i1 %39, label %40, label %46
40: ; preds = %35
%41 = load i8*, i8** %5
%42 = load i8, i8* %41
%43 = sext i8 %42 to i32
%44 = load i32, i32* %9
%45 = icmp sle i32 %43, %44
br label %46
46: ; preds = %40, %35
%47 = phi i1 [ false, %35 ], [ %45, %40 ]
br i1 %47, label %48, label %59
48: ; preds = %46
%49 = load i32, i32* %6
%50 = sext i32 %49 to i64
%51 = load i64, i64* %10
%52 = mul nsw i64 %50, %51
%53 = load i8*, i8** %5
%54 = getelementptr inbounds i8, i8* %53, i32 1
store i8* %54, i8** %5
%55 = load i8, i8* %53
%56 = sext i8 %55 to i64
%57 = add nsw i64 %52, %56
%58 = sub nsw i64 %57, 48
store i64 %58, i64* %10
br label %35
59: ; preds = %46
%60 = load i8*, i8** %5
%61 = load i8, i8* %60
%62 = icmp ne i8 %61, 0
br i1 %62, label %63, label %65
63: ; preds = %59
%64 = call i32 (i8*, i8*, ...) bitcast (i32 (...)* @fatal to i32 (i8*, i8*, ...)*)(i8* getelementptr inbounds ([36 x i8], [36 x i8]* @.str, i64 0, i64 0), i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str.1, i64 0, i64 0))
br label %65
65: ; preds = %63, %59
%66 = load i64, i64* %10
%67 = load i64*, i64** %7
store i64 %66, i64* %67
ret void
}

LLVM IR (-O2):
@.str = [36 x i8] c"syntax error: illegal numeric value\00"
@.str.1 = [1 x i8] zeroinitializer
define void @number(i8* nocapture %0, i32 %1, i64* nocapture writeonly %2, i32* nocapture writeonly %3) {
%5 = add nsw i32 %1, 47
%6 = load i8, i8* %0
switch i8 %6, label %11 [
i8 45, label %7
i8 43, label %7
]
7: ; preds = %4, %4
%8 = getelementptr inbounds i8, i8* %0, i64 1
%9 = icmp eq i8 %6, 45
%10 = select i1 %9, i32 -1, i32 1
br label %11
11: ; preds = %4, %7
%12 = phi i8* [ %8, %7 ], [ %0, %4 ]
%13 = phi i32 [ %10, %7 ], [ 0, %4 ]
store i32 %13, i32* %3
%14 = load i8, i8* %12
%15 = icmp slt i8 %14, 48
%16 = sext i8 %14 to i32
%17 = icmp slt i32 %5, %16
%18 = select i1 %15, i1 true, i1 %17
br i1 %18, label %35, label %19
19: ; preds = %11
%20 = sext i32 %1 to i64
br label %21
21: ; preds = %19, %21
%22 = phi i8 [ %14, %19 ], [ %30, %21 ]
%23 = phi i64 [ 0, %19 ], [ %29, %21 ]
%24 = phi i8* [ %12, %19 ], [ %26, %21 ]
%25 = mul nsw i64 %23, %20
%26 = getelementptr inbounds i8, i8* %24, i64 1
%27 = zext i8 %22 to i64
%28 = add i64 %25, -48
%29 = add i64 %28, %27
%30 = load i8, i8* %26
%31 = icmp slt i8 %30, 48
%32 = sext i8 %30 to i32
%33 = icmp slt i32 %5, %32
%34 = select i1 %31, i1 true, i1 %33
br i1 %34, label %35, label %21
35: ; preds = %21, %11
%36 = phi i64 [ 0, %11 ], [ %29, %21 ]
%37 = phi i8 [ %14, %11 ], [ %30, %21 ]
%38 = icmp eq i8 %37, 0
br i1 %38, label %41, label %39
39: ; preds = %35
%40 = tail call i32 (i8*, i8*, ...) bitcast (i32 (...)* @fatal to i32 (i8*, i8*, ...)*)(i8* getelementptr inbounds ([36 x i8], [36 x i8]* @.str, i64 0, i64 0), i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str.1, i64 0, i64 0))
br label %41
41: ; preds = %39, %35
store i64 %36, i64* %2
ret void
}