void *printn(void *(*emit)(void *, char), void *arg, int *nchar, long n) {
  long a;
  if (n < 0) {
    arg = emit(arg, '-');
    (*nchar)++;
    n = -n;
  }
  a = n / 10;
  if (a != 0) {
    arg = printn(emit, arg, nchar, a);
  }
  arg = emit(arg, n % 10 + '0');
  (*nchar)++;
  return arg;
}


x86 assembly (clang, -O0):
<printn>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
cmpq   $0x0,-0x20(%rbp)
jge    115b <printn+0x4b>
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rdi
mov    $0x2d,%esi
call   *%rax
mov    %rax,-0x10(%rbp)
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
xor    %eax,%eax
sub    -0x20(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
mov    $0xa,%ecx
cqto
idiv   %rcx
mov    %rax,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
je     1191 <printn+0x81>
mov    -0x8(%rbp),%rdi
mov    -0x10(%rbp),%rsi
mov    -0x18(%rbp),%rdx
mov    -0x28(%rbp),%rcx
call   1030 <printn@plt>
mov    %rax,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x10(%rbp),%rdi
mov    -0x20(%rbp),%rax
mov    $0xa,%ecx
cqto
idiv   %rcx
mov    -0x30(%rbp),%rax
add    $0x30,%rdx
mov    %dl,%cl
movsbl %cl,%esi
call   *%rax
mov    %rax,-0x10(%rbp)
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
mov    -0x10(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<printn>:
push   %r15
push   %r14
push   %r12
push   %rbx
push   %rax
mov    %rcx,%rbx
mov    %rdx,%r14
mov    %rdi,%r15
test   %rcx,%rcx
jns    113b <printn+0x2b>
mov    %rsi,%rdi
mov    $0x2d,%esi
call   *%r15
mov    %rax,%rsi
addl   $0x1,(%r14)
neg    %rbx
movabs $0xcccccccccccccccd,%r12
cc cc cc
cmp    $0xa,%rbx
jb     1166 <printn+0x56>
mov    %rbx,%rax
mul    %r12
mov    %rdx,%rcx
shr    $0x3,%rcx
mov    %r15,%rdi
mov    %r14,%rdx
call   1030 <printn@plt>
mov    %rax,%rsi
mov    %rbx,%rax
mul    %r12
shr    $0x2,%edx
and    $0xfffffffe,%edx
lea    (%rdx,%rdx,4),%eax
sub    %eax,%ebx
or     $0x30,%bl
movzbl %bl,%eax
mov    %rsi,%rdi
mov    %eax,%esi
call   *%r15
addl   $0x1,(%r14)
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
define i8* @printn(i8* (i8*, i8)* %0, i8* %1, i32* %2, i64 %3) {
%5 = alloca i8* (i8*, i8)*
%6 = alloca i8*
%7 = alloca i32*
%8 = alloca i64
%9 = alloca i64
store i8* (i8*, i8)* %0, i8* (i8*, i8)** %5
store i8* %1, i8** %6
store i32* %2, i32** %7
store i64 %3, i64* %8
%10 = load i64, i64* %8
%11 = icmp slt i64 %10, 0
br i1 %11, label %12, label %21
12: ; preds = %4
%13 = load i8* (i8*, i8)*, i8* (i8*, i8)** %5
%14 = load i8*, i8** %6
%15 = call i8* %13(i8* %14, i8 signext 45)
store i8* %15, i8** %6
%16 = load i32*, i32** %7
%17 = load i32, i32* %16
%18 = add nsw i32 %17, 1
store i32 %18, i32* %16
%19 = load i64, i64* %8
%20 = sub nsw i64 0, %19
store i64 %20, i64* %8
br label %21
21: ; preds = %12, %4
%22 = load i64, i64* %8
%23 = sdiv i64 %22, 10
store i64 %23, i64* %9
%24 = load i64, i64* %9
%25 = icmp ne i64 %24, 0
br i1 %25, label %26, label %32
26: ; preds = %21
%27 = load i8* (i8*, i8)*, i8* (i8*, i8)** %5
%28 = load i8*, i8** %6
%29 = load i32*, i32** %7
%30 = load i64, i64* %9
%31 = call i8* @printn(i8* (i8*, i8)* %27, i8* %28, i32* %29, i64 %30)
store i8* %31, i8** %6
br label %32
32: ; preds = %26, %21
%33 = load i8* (i8*, i8)*, i8* (i8*, i8)** %5
%34 = load i8*, i8** %6
%35 = load i64, i64* %8
%36 = srem i64 %35, 10
%37 = add nsw i64 %36, 48
%38 = trunc i64 %37 to i8
%39 = call i8* %33(i8* %34, i8 signext %38)
store i8* %39, i8** %6
%40 = load i32*, i32** %7
%41 = load i32, i32* %40
%42 = add nsw i32 %41, 1
store i32 %42, i32* %40
%43 = load i8*, i8** %6
ret i8* %43
}

LLVM IR (-O2):
define i8* @printn(i8* (i8*, i8)* nocapture %0, i8* %1, i32* nocapture %2, i64 %3) {
%5 = icmp slt i64 %3, 0
br i1 %5, label %6, label %11
6: ; preds = %4
%7 = tail call i8* %0(i8* %1, i8 signext 45)
%8 = load i32, i32* %2
%9 = add nsw i32 %8, 1
store i32 %9, i32* %2
%10 = sub nsw i64 0, %3
br label %11
11: ; preds = %6, %4
%12 = phi i64 [ %10, %6 ], [ %3, %4 ]
%13 = phi i8* [ %7, %6 ], [ %1, %4 ]
%14 = icmp ult i64 %12, 10
br i1 %14, label %18, label %15
15: ; preds = %11
%16 = udiv i64 %12, 10
%17 = tail call i8* @printn(i8* (i8*, i8)* %0, i8* %13, i32* %2, i64 %16)
br label %18
18: ; preds = %15, %11
%19 = phi i8* [ %17, %15 ], [ %13, %11 ]
%20 = urem i64 %12, 10
%21 = trunc i64 %20 to i8
%22 = or i8 %21, 48
%23 = tail call i8* %0(i8* %19, i8 signext %22)
%24 = load i32, i32* %2
%25 = add nsw i32 %24, 1
store i32 %25, i32* %2
ret i8* %23
}