int evalnum(c)
register int c;
{
  register int value;
  register int base;
  register int c1;
  if (c != '0')
    base = 10;
  else if ((c = cget()) == 'x' || c == 'X') {
    base = 16;
    c = cget();
  } else
    base = 8;
  value = 0;
  for (;;) {
    c1 = c;
    if (isupper(c1))
      c1 = tolower(c1);
    if (c1 >= 'a')
      c1 -= ('a' - 10);
    else
      c1 -= '0';
    if (c1 < 0 || c1 >= base)
      break;
    value *= base;
    value += c1;
    c = cget();
  }
  if (c == 'u' || c == 'U' || c == 'l' || c == 'L')
    c = cget();
  unget();
  return (value);
}


x86 assembly (clang, -O0):
<evalnum>:
push   %rbp
mov    %rsp,%rbp
sub    $0x10,%rsp
mov    %edi,-0x4(%rbp)
cmpl   $0x30,-0x4(%rbp)
je     1161 <evalnum+0x21>
movl   $0xa,-0xc(%rbp)
jmp    11a0 <evalnum+0x60>
mov    $0x0,%al
call   1060 <cget@plt>
mov    %eax,-0x4(%rbp)
cmp    $0x78,%eax
je     117e <evalnum+0x3e>
cmpl   $0x58,-0x4(%rbp)
jne    1194 <evalnum+0x54>
movl   $0x10,-0xc(%rbp)
mov    $0x0,%al
call   1060 <cget@plt>
mov    %eax,-0x4(%rbp)
jmp    119b <evalnum+0x5b>
movl   $0x8,-0xc(%rbp)
jmp    11a0 <evalnum+0x60>
movl   $0x0,-0x8(%rbp)
mov    -0x4(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%edi
call   1050 <isupper@plt>
cmp    $0x0,%eax
je     11c9 <evalnum+0x89>
mov    -0x10(%rbp),%edi
call   1040 <tolower@plt>
mov    %eax,-0x10(%rbp)
cmpl   $0x61,-0x10(%rbp)
jl     11e1 <evalnum+0xa1>
mov    -0x10(%rbp),%eax
sub    $0x57,%eax
mov    %eax,-0x10(%rbp)
jmp    11ea <evalnum+0xaa>
mov    -0x10(%rbp),%eax
sub    $0x30,%eax
mov    %eax,-0x10(%rbp)
cmpl   $0x0,-0x10(%rbp)
jl     1200 <evalnum+0xc0>
mov    -0x10(%rbp),%eax
cmp    -0xc(%rbp),%eax
jl     1205 <evalnum+0xc5>
jmp    1227 <evalnum+0xe7>
mov    -0xc(%rbp),%eax
imul   -0x8(%rbp),%eax
mov    %eax,-0x8(%rbp)
mov    -0x10(%rbp),%eax
add    -0x8(%rbp),%eax
mov    %eax,-0x8(%rbp)
mov    $0x0,%al
call   1060 <cget@plt>
mov    %eax,-0x4(%rbp)
jmp    11a7 <evalnum+0x67>
cmpl   $0x75,-0x4(%rbp)
je     124f <evalnum+0x10f>
cmpl   $0x55,-0x4(%rbp)
je     124f <evalnum+0x10f>
cmpl   $0x6c,-0x4(%rbp)
je     124f <evalnum+0x10f>
cmpl   $0x4c,-0x4(%rbp)
jne    1259 <evalnum+0x119>
mov    $0x0,%al
call   1060 <cget@plt>
mov    %eax,-0x4(%rbp)
mov    $0x0,%al
call   1030 <unget@plt>
mov    -0x8(%rbp),%eax
add    $0x10,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<evalnum>:
push   %rbp
push   %r14
push   %rbx
mov    %edi,%ebx
mov    $0xa,%r14d
cmp    $0x30,%edi
jne    1179 <evalnum+0x39>
xor    %eax,%eax
call   1060 <cget@plt>
mov    %eax,%ebx
and    $0xffffffdf,%eax
cmp    $0x58,%eax
jne    1173 <evalnum+0x33>
xor    %eax,%eax
call   1060 <cget@plt>
mov    %eax,%ebx
mov    $0x10,%r14d
jmp    1179 <evalnum+0x39>
mov    $0x8,%r14d
xor    %ebp,%ebp
nopl   0x0(%rax,%rax,1)
mov    %ebx,%edi
call   1050 <isupper@plt>
mov    %eax,%ecx
mov    %ebx,%eax
test   %ecx,%ecx
je     1196 <evalnum+0x56>
mov    %ebx,%edi
call   1040 <tolower@plt>
lea    -0x30(%rax),%edx
lea    -0x57(%rax),%ecx
cmp    $0x61,%eax
cmovl  %edx,%ecx
cmp    %r14d,%ecx
jae    11b8 <evalnum+0x78>
imul   %r14d,%ebp
add    %ecx,%ebp
xor    %eax,%eax
call   1060 <cget@plt>
mov    %eax,%ebx
jmp    1180 <evalnum+0x40>
add    $0xffffffb4,%ebx
cmp    $0x29,%ebx
ja     11d7 <evalnum+0x97>
movabs $0x20100000201,%rax
bt     %rbx,%rax
jae    11d7 <evalnum+0x97>
xor    %eax,%eax
call   1060 <cget@plt>
xor    %eax,%eax
call   1030 <unget@plt>
mov    %ebp,%eax
pop    %rbx
pop    %r14
pop    %rbp
ret

LLVM IR (-O0):
define i32 @evalnum(i32 %0) {
%2 = alloca i32
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32
store i32 %0, i32* %2
%6 = load i32, i32* %2
%7 = icmp ne i32 %6, 48
br i1 %7, label %8, label %9
8: ; preds = %1
store i32 10, i32* %4
br label %19
9: ; preds = %1
%10 = call i32 (...) @cget()
store i32 %10, i32* %2
%11 = icmp eq i32 %10, 120
br i1 %11, label %15, label %12
12: ; preds = %9
%13 = load i32, i32* %2
%14 = icmp eq i32 %13, 88
br i1 %14, label %15, label %17
15: ; preds = %12, %9
store i32 16, i32* %4
%16 = call i32 (...) @cget()
store i32 %16, i32* %2
br label %18
17: ; preds = %12
store i32 8, i32* %4
br label %18
18: ; preds = %17, %15
br label %19
19: ; preds = %18, %8
store i32 0, i32* %3
br label %20
20: ; preds = %45, %19
%21 = load i32, i32* %2
store i32 %21, i32* %5
%22 = load i32, i32* %5
%23 = call i32 @isupper(i32 %22)
%24 = icmp ne i32 %23, 0
br i1 %24, label %25, label %28
25: ; preds = %20
%26 = load i32, i32* %5
%27 = call i32 @tolower(i32 %26)
store i32 %27, i32* %5
br label %28
28: ; preds = %25, %20
%29 = load i32, i32* %5
%30 = icmp sge i32 %29, 97
br i1 %30, label %31, label %34
31: ; preds = %28
%32 = load i32, i32* %5
%33 = sub nsw i32 %32, 87
store i32 %33, i32* %5
br label %37
34: ; preds = %28
%35 = load i32, i32* %5
%36 = sub nsw i32 %35, 48
store i32 %36, i32* %5
br label %37
37: ; preds = %34, %31
%38 = load i32, i32* %5
%39 = icmp slt i32 %38, 0
br i1 %39, label %44, label %40
40: ; preds = %37
%41 = load i32, i32* %5
%42 = load i32, i32* %4
%43 = icmp sge i32 %41, %42
br i1 %43, label %44, label %45
44: ; preds = %40, %37
br label %53
45: ; preds = %40
%46 = load i32, i32* %4
%47 = load i32, i32* %3
%48 = mul nsw i32 %47, %46
store i32 %48, i32* %3
%49 = load i32, i32* %5
%50 = load i32, i32* %3
%51 = add nsw i32 %50, %49
store i32 %51, i32* %3
%52 = call i32 (...) @cget()
store i32 %52, i32* %2
br label %20
53: ; preds = %44
%54 = load i32, i32* %2
%55 = icmp eq i32 %54, 117
br i1 %55, label %65, label %56
56: ; preds = %53
%57 = load i32, i32* %2
%58 = icmp eq i32 %57, 85
br i1 %58, label %65, label %59
59: ; preds = %56
%60 = load i32, i32* %2
%61 = icmp eq i32 %60, 108
br i1 %61, label %65, label %62
62: ; preds = %59
%63 = load i32, i32* %2
%64 = icmp eq i32 %63, 76
br i1 %64, label %65, label %67
65: ; preds = %62, %59, %56, %53
%66 = call i32 (...) @cget()
store i32 %66, i32* %2
br label %67
67: ; preds = %65, %62
%68 = call i32 (...) @unget()
%69 = load i32, i32* %3
ret i32 %69
}

LLVM IR (-O2):
define i32 @evalnum(i32 %0) {
%2 = icmp eq i32 %0, 48
br i1 %2, label %3, label %9
3: ; preds = %1
%4 = tail call i32 (...) @cget()
%5 = and i32 %4, -33
%6 = icmp eq i32 %5, 88
br i1 %6, label %7, label %9
7: ; preds = %3
%8 = tail call i32 (...) @cget()
br label %9
9: ; preds = %3, %1, %7
%10 = phi i32 [ %8, %7 ], [ %0, %1 ], [ %4, %3 ]
%11 = phi i32 [ 16, %7 ], [ 10, %1 ], [ 8, %3 ]
br label %12
12: ; preds = %25, %9
%13 = phi i32 [ %10, %9 ], [ %28, %25 ]
%14 = phi i32 [ 0, %9 ], [ %27, %25 ]
%15 = tail call i32 @isupper(i32 %13)
%16 = icmp eq i32 %15, 0
br i1 %16, label %19, label %17
17: ; preds = %12
%18 = tail call i32 @tolower(i32 %13)
br label %19
19: ; preds = %17, %12
%20 = phi i32 [ %18, %17 ], [ %13, %12 ]
%21 = icmp sgt i32 %20, 96
%22 = select i1 %21, i32 -87, i32 -48
%23 = add nsw i32 %22, %20
%24 = icmp ult i32 %23, %11
br i1 %24, label %25, label %29
25: ; preds = %19
%26 = mul nsw i32 %14, %11
%27 = add nsw i32 %23, %26
%28 = tail call i32 (...) @cget()
br label %12
29: ; preds = %19
switch i32 %13, label %32 [
i32 117, label %30
i32 108, label %30
i32 85, label %30
i32 76, label %30
]
30: ; preds = %29, %29, %29, %29
%31 = tail call i32 (...) @cget()
br label %32
32: ; preds = %29, %30
%33 = tail call i32 (...) @unget()
ret i32 %14
}