printnum(n, base, sign, width, pad) long n;
int base, sign;
int width, pad;
{
  register short i, mod;
  char a[32];
  register char *p = a;
  if (sign)
    if (n < 0) {
      n = -n;
      width--;
    } else
      sign = 0;
  do {
    mod = 0;
    for (i = 0; i < 32; i++) {
      mod <<= 1;
      if (n < 0)
        mod++;
      n <<= 1;
      if (mod >= base) {
        mod -= base;
        n++;
      }
    }
    *p++ = "0123456789ABCDEF"[mod];
    width--;
  } while (n);
  while (width-- > 0)
    putchar(pad);
  if (sign)
    *p++ = '-';
  while (p > a)
    putchar(*--p);
}


x86 assembly (clang, -O0):
<printnum>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    %edx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
mov    %r8d,-0x20(%rbp)
lea    -0x50(%rbp),%rax
mov    %rax,-0x58(%rbp)
cmpl   $0x0,-0x18(%rbp)
je     116a <printnum+0x5a>
cmpq   $0x0,-0x10(%rbp)
jge    115e <printnum+0x4e>
xor    %eax,%eax
sub    -0x10(%rbp),%rax
mov    %rax,-0x10(%rbp)
mov    -0x1c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x1c(%rbp)
jmp    1165 <printnum+0x55>
movl   $0x0,-0x18(%rbp)
jmp    116a <printnum+0x5a>
jmp    116f <printnum+0x5f>
movw   $0x0,-0x24(%rbp)
movw   $0x0,-0x22(%rbp)
movswl -0x22(%rbp),%eax
cmp    $0x20,%eax
jge    11f2 <printnum+0xe2>
movswl -0x24(%rbp),%eax
shl    $0x1,%eax
mov    %ax,-0x24(%rbp)
cmpq   $0x0,-0x10(%rbp)
jge    11aa <printnum+0x9a>
mov    -0x24(%rbp),%ax
add    $0x1,%ax
mov    %ax,-0x24(%rbp)
mov    -0x10(%rbp),%rax
shl    $0x1,%rax
mov    %rax,-0x10(%rbp)
movswl -0x24(%rbp),%eax
cmp    -0x14(%rbp),%eax
jl     11dc <printnum+0xcc>
mov    -0x14(%rbp),%ecx
movswl -0x24(%rbp),%eax
sub    %ecx,%eax
mov    %ax,-0x24(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    11e1 <printnum+0xd1>
mov    -0x22(%rbp),%ax
add    $0x1,%ax
mov    %ax,-0x22(%rbp)
jmp    117b <printnum+0x6b>
movswq -0x24(%rbp),%rcx
lea    0xe02(%rip),%rax
mov    (%rax,%rcx,1),%cl
mov    -0x58(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x58(%rbp)
mov    %cl,(%rax)
mov    -0x1c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x1c(%rbp)
cmpq   $0x0,-0x10(%rbp)
jne    116f <printnum+0x5f>
jmp    122b <printnum+0x11b>
mov    -0x1c(%rbp),%eax
mov    %eax,%ecx
add    $0xffffffff,%ecx
mov    %ecx,-0x1c(%rbp)
cmp    $0x0,%eax
jle    124e <printnum+0x13e>
mov    -0x20(%rbp),%edi
mov    $0x0,%al
call   1030 <putchar@plt>
jmp    122b <printnum+0x11b>
cmpl   $0x0,-0x18(%rbp)
je     126a <printnum+0x15a>
mov    -0x58(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x58(%rbp)
movb   $0x2d,(%rax)
jmp    126f <printnum+0x15f>
mov    -0x58(%rbp),%rax
lea    -0x50(%rbp),%rcx
cmp    %rcx,%rax
jbe    129f <printnum+0x18f>
mov    -0x58(%rbp),%rax
mov    %rax,%rcx
add    $0xffffffffffffffff,%rcx
mov    %rcx,-0x58(%rbp)
movsbl -0x1(%rax),%edi
mov    $0x0,%al
call   1030 <putchar@plt>
jmp    126f <printnum+0x15f>
mov    -0x4(%rbp),%eax
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<printnum>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x28,%rsp
mov    %r8d,%r15d
mov    %rsp,%rbp
test   %edx,%edx
setne  %al
test   %rdi,%rdi
sets   %r14b
and    %al,%r14b
mov    %rdi,%rbx
neg    %rbx
movzbl %r14b,%eax
sub    %eax,%ecx
test   %al,%al
cmove  %rdi,%rbx
xor    %r9d,%r9d
lea    0xeb1(%rip),%r8
nop
mov    %rbp,%r12
mov    %ecx,%r13d
mov    $0x20,%cx
xor    %ebp,%ebp
nopl   0x0(%rax)
mov    %rbx,%rdx
shr    $0x3f,%rdx
lea    (%rdx,%rbp,2),%edx
lea    (%rbx,%rbx,1),%rbp
movswl %dx,%edi
xor    %eax,%eax
cmp    %esi,%edi
setge  %al
lea    (%rax,%rbx,2),%rax
mov    %esi,%edi
cmovl  %r9d,%edi
sub    %edi,%edx
shr    $0x3f,%rbp
lea    0x0(%rbp,%rdx,2),%ebp
movswl %bp,%edx
xor    %edi,%edi
cmp    %esi,%edx
setge  %dil
lea    (%rdi,%rax,2),%rbx
mov    %esi,%eax
cmovl  %r9d,%eax
sub    %eax,%ebp
add    $0xfffe,%cx
jne    1160 <printnum+0x50>
movswq %bp,%rax
mov    (%rax,%r8,1),%al
lea    0x1(%r12),%rbp
mov    %al,(%r12)
lea    -0x1(%r13),%ecx
test   %rbx,%rbx
jne    1150 <printnum+0x40>
cmp    $0x2,%r13d
jl     11e4 <printnum+0xd4>
nopl   0x0(%rax)
mov    %r15d,%edi
xor    %eax,%eax
call   1030 <putchar@plt>
add    $0xffffffff,%r13d
cmp    $0x1,%r13d
ja     11d0 <printnum+0xc0>
test   %r14b,%r14b
je     11f6 <printnum+0xe6>
movb   $0x2d,0x1(%r12)
add    $0x2,%r12
mov    %r12,%rbp
mov    %rsp,%rbx
cmp    %rbx,%rbp
jbe    1214 <printnum+0x104>
xchg   %ax,%ax
movsbl -0x1(%rbp),%edi
add    $0xffffffffffffffff,%rbp
xor    %eax,%eax
call   1030 <putchar@plt>
cmp    %rbx,%rbp
ja     1200 <printnum+0xf0>
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [17 x i8] c"0123456789ABCDEF\00"
define i32 @printnum(i64 %0, i32 %1, i32 %2, i32 %3, i32 %4) {
%6 = alloca i32
%7 = alloca i64
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca i16
%13 = alloca i16
%14 = alloca [32 x i8]
%15 = alloca i8*
store i64 %0, i64* %7
store i32 %1, i32* %8
store i32 %2, i32* %9
store i32 %3, i32* %10
store i32 %4, i32* %11
%16 = getelementptr inbounds [32 x i8], [32 x i8]* %14, i64 0, i64 0
store i8* %16, i8** %15
%17 = load i32, i32* %9
%18 = icmp ne i32 %17, 0
br i1 %18, label %19, label %29
19: ; preds = %5
%20 = load i64, i64* %7
%21 = icmp slt i64 %20, 0
br i1 %21, label %22, label %27
22: ; preds = %19
%23 = load i64, i64* %7
%24 = sub nsw i64 0, %23
store i64 %24, i64* %7
%25 = load i32, i32* %10
%26 = add nsw i32 %25, -1
store i32 %26, i32* %10
br label %28
27: ; preds = %19
store i32 0, i32* %9
br label %28
28: ; preds = %27, %22
br label %29
29: ; preds = %28, %5
br label %30
30: ; preds = %73, %29
store i16 0, i16* %13
store i16 0, i16* %12
br label %31
31: ; preds = %61, %30
%32 = load i16, i16* %12
%33 = sext i16 %32 to i32
%34 = icmp slt i32 %33, 32
br i1 %34, label %35, label %64
35: ; preds = %31
%36 = load i16, i16* %13
%37 = sext i16 %36 to i32
%38 = shl i32 %37, 1
%39 = trunc i32 %38 to i16
store i16 %39, i16* %13
%40 = load i64, i64* %7
%41 = icmp slt i64 %40, 0
br i1 %41, label %42, label %45
42: ; preds = %35
%43 = load i16, i16* %13
%44 = add i16 %43, 1
store i16 %44, i16* %13
br label %45
45: ; preds = %42, %35
%46 = load i64, i64* %7
%47 = shl i64 %46, 1
store i64 %47, i64* %7
%48 = load i16, i16* %13
%49 = sext i16 %48 to i32
%50 = load i32, i32* %8
%51 = icmp sge i32 %49, %50
br i1 %51, label %52, label %60
52: ; preds = %45
%53 = load i32, i32* %8
%54 = load i16, i16* %13
%55 = sext i16 %54 to i32
%56 = sub nsw i32 %55, %53
%57 = trunc i32 %56 to i16
store i16 %57, i16* %13
%58 = load i64, i64* %7
%59 = add nsw i64 %58, 1
store i64 %59, i64* %7
br label %60
60: ; preds = %52, %45
br label %61
61: ; preds = %60
%62 = load i16, i16* %12
%63 = add i16 %62, 1
store i16 %63, i16* %12
br label %31
64: ; preds = %31
%65 = load i16, i16* %13
%66 = sext i16 %65 to i64
%67 = getelementptr inbounds [17 x i8], [17 x i8]* @.str, i64 0, i64 %66
%68 = load i8, i8* %67
%69 = load i8*, i8** %15
%70 = getelementptr inbounds i8, i8* %69, i32 1
store i8* %70, i8** %15
store i8 %68, i8* %69
%71 = load i32, i32* %10
%72 = add nsw i32 %71, -1
store i32 %72, i32* %10
br label %73
73: ; preds = %64
%74 = load i64, i64* %7
%75 = icmp ne i64 %74, 0
br i1 %75, label %30, label %76
76: ; preds = %73
br label %77
77: ; preds = %81, %76
%78 = load i32, i32* %10
%79 = add nsw i32 %78, -1
store i32 %79, i32* %10
%80 = icmp sgt i32 %78, 0
br i1 %80, label %81, label %84
81: ; preds = %77
%82 = load i32, i32* %11
%83 = call i32 (i32, ...) bitcast (i32 (...)* @putchar to i32 (i32, ...)*)(i32 %82)
br label %77
84: ; preds = %77
%85 = load i32, i32* %9
%86 = icmp ne i32 %85, 0
br i1 %86, label %87, label %90
87: ; preds = %84
%88 = load i8*, i8** %15
%89 = getelementptr inbounds i8, i8* %88, i32 1
store i8* %89, i8** %15
store i8 45, i8* %88
br label %90
90: ; preds = %87, %84
br label %91
91: ; preds = %95, %90
%92 = load i8*, i8** %15
%93 = getelementptr inbounds [32 x i8], [32 x i8]* %14, i64 0, i64 0
%94 = icmp ugt i8* %92, %93
br i1 %94, label %95, label %101
95: ; preds = %91
%96 = load i8*, i8** %15
%97 = getelementptr inbounds i8, i8* %96, i32 -1
store i8* %97, i8** %15
%98 = load i8, i8* %97
%99 = sext i8 %98 to i32
%100 = call i32 (i32, ...) bitcast (i32 (...)* @putchar to i32 (i32, ...)*)(i32 %99)
br label %91
101: ; preds = %91
%102 = load i32, i32* %6
ret i32 %102
}

LLVM IR (-O2):
@.str = [17 x i8] c"0123456789ABCDEF\00"
define i32 @printnum(i64 %0, i32 %1, i32 %2, i32 %3, i32 %4) {
%6 = alloca [32 x i8]
%7 = getelementptr inbounds [32 x i8], [32 x i8]* %6, i64 0, i64 0
%8 = icmp ne i32 %2, 0
%9 = icmp slt i64 %0, 0
%10 = and i1 %9, %8
%11 = sub nsw i64 0, %0
%12 = sext i1 %10 to i32
%13 = add nsw i32 %12, %3
%14 = select i1 %10, i64 %11, i64 %0
%15 = trunc i32 %1 to i16
br label %16
16: ; preds = %50, %5
%17 = phi i32 [ %13, %5 ], [ %55, %50 ]
%18 = phi i64 [ %14, %5 ], [ %45, %50 ]
%19 = phi i8* [ %7, %5 ], [ %54, %50 ]
br label %20
20: ; preds = %20, %16
%21 = phi i16 [ 0, %16 ], [ %47, %20 ]
%22 = phi i16 [ 0, %16 ], [ %48, %20 ]
%23 = phi i64 [ %18, %16 ], [ %45, %20 ]
%24 = shl i16 %21, 1
%25 = lshr i64 %23, 63
%26 = trunc i64 %25 to i16
%27 = or i16 %24, %26
%28 = shl i64 %23, 1
%29 = sext i16 %27 to i32
%30 = icmp slt i32 %29, %1
%31 = xor i1 %30, true
%32 = zext i1 %31 to i64
%33 = or i64 %28, %32
%34 = select i1 %30, i16 0, i16 %15
%35 = sub i16 %27, %34
%36 = shl i16 %35, 1
%37 = lshr i64 %28, 63
%38 = trunc i64 %37 to i16
%39 = or i16 %36, %38
%40 = shl i64 %33, 1
%41 = sext i16 %39 to i32
%42 = icmp slt i32 %41, %1
%43 = xor i1 %42, true
%44 = zext i1 %43 to i64
%45 = or i64 %40, %44
%46 = select i1 %42, i16 0, i16 %15
%47 = sub i16 %39, %46
%48 = add nuw nsw i16 %22, 2
%49 = icmp eq i16 %48, 32
br i1 %49, label %50, label %20
50: ; preds = %20
%51 = sext i16 %47 to i64
%52 = getelementptr inbounds [17 x i8], [17 x i8]* @.str, i64 0, i64 %51
%53 = load i8, i8* %52
%54 = getelementptr inbounds i8, i8* %19, i64 1
store i8 %53, i8* %19
%55 = add nsw i32 %17, -1
%56 = icmp eq i64 %45, 0
br i1 %56, label %57, label %16
57: ; preds = %50
%58 = icmp sgt i32 %17, 1
br i1 %58, label %59, label %64
59: ; preds = %57, %59
%60 = phi i32 [ %61, %59 ], [ %55, %57 ]
%61 = add nsw i32 %60, -1
%62 = tail call i32 (i32, ...) bitcast (i32 (...)* @putchar to i32 (i32, ...)*)(i32 %4)
%63 = icmp ugt i32 %60, 1
br i1 %63, label %59, label %64
64: ; preds = %59, %57
br i1 %10, label %65, label %67
65: ; preds = %64
%66 = getelementptr inbounds i8, i8* %19, i64 2
store i8 45, i8* %54
br label %67
67: ; preds = %65, %64
%68 = phi i8* [ %66, %65 ], [ %54, %64 ]
%69 = icmp ugt i8* %68, %7
br i1 %69, label %70, label %77
70: ; preds = %67, %70
%71 = phi i8* [ %72, %70 ], [ %68, %67 ]
%72 = getelementptr inbounds i8, i8* %71, i64 -1
%73 = load i8, i8* %72
%74 = sext i8 %73 to i32
%75 = call i32 (i32, ...) bitcast (i32 (...)* @putchar to i32 (i32, ...)*)(i32 %74)
%76 = icmp ugt i8* %72, %7
br i1 %76, label %70, label %77
77: ; preds = %70, %67
ret i32 undef
}