unsigned char *exponent(unsigned char *p, int exp, unsigned char fmtch) {
  unsigned char expbuf[8], *t;
  *p++ = fmtch;
  if (exp < 0) {
    exp = -exp;
    *p++ = '-';
  } else {
    *p++ = '+';
  }
  t = expbuf + sizeof(expbuf);
  if (exp > 9) {
    do {
      *--t = exp % 10 + '0';
    } while ((exp /= 10) > 9);
    *--t = exp + '0';
    for (; t < expbuf + sizeof(expbuf); *p++ = *t++)
      continue;
  } else {
    *p++ = '0';
    *p++ = exp + '0';
  }
  return p;
}


x86 assembly (clang, -O0):
<exponent>:
push   %rbp
mov    %rsp,%rbp
mov    %dl,%al
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %al,-0xd(%rbp)
mov    -0xd(%rbp),%cl
mov    -0x8(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x8(%rbp)
mov    %cl,(%rax)
cmpl   $0x0,-0xc(%rbp)
jge    114d <exponent+0x4d>
xor    %eax,%eax
sub    -0xc(%rbp),%eax
mov    %eax,-0xc(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
movb   $0x2d,(%rax)
jmp    115f <exponent+0x5f>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
movb   $0x2b,(%rax)
lea    -0x15(%rbp),%rax
add    $0x8,%rax
mov    %rax,-0x20(%rbp)
cmpl   $0x9,-0xc(%rbp)
jle    1213 <exponent+0x113>
jmp    117a <exponent+0x7a>
mov    -0xc(%rbp),%eax
mov    $0xa,%ecx
cltd
idiv   %ecx
add    $0x30,%edx
mov    %dl,%cl
mov    -0x20(%rbp),%rax
mov    %rax,%rdx
add    $0xffffffffffffffff,%rdx
mov    %rdx,-0x20(%rbp)
mov    %cl,-0x1(%rax)
mov    -0xc(%rbp),%eax
mov    $0xa,%ecx
cltd
idiv   %ecx
mov    %eax,-0xc(%rbp)
cmp    $0x9,%eax
jg     117a <exponent+0x7a>
mov    -0xc(%rbp),%eax
add    $0x30,%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %rax,%rdx
add    $0xffffffffffffffff,%rdx
mov    %rdx,-0x20(%rbp)
mov    %cl,-0x1(%rax)
mov    -0x20(%rbp),%rax
lea    -0x15(%rbp),%rcx
add    $0x8,%rcx
cmp    %rcx,%rax
jae    120e <exponent+0x10e>
jmp    11e7 <exponent+0xe7>
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x20(%rbp)
mov    (%rax),%cl
mov    -0x8(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x8(%rbp)
mov    %cl,(%rax)
jmp    11cd <exponent+0xcd>
jmp    123e <exponent+0x13e>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
movb   $0x30,(%rax)
mov    -0xc(%rbp),%eax
add    $0x30,%eax
mov    %al,%cl
mov    -0x8(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x8(%rbp)
mov    %cl,(%rax)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<exponent>:
push   %r14
push   %rbx
push   %rax
mov    %rdi,%r14
mov    %dl,(%rdi)
mov    %esi,%eax
shr    $0x1f,%eax
add    %al,%al
add    $0x2b,%al
mov    %esi,%ecx
neg    %ecx
cmovs  %esi,%ecx
mov    %al,0x1(%rdi)
cmp    $0xa,%ecx
jl     119e <exponent+0x8e>
lea    0x2(%r14),%rax
lea    0x8(%rsp),%r8
xor    %ebx,%ebx
nopl   0x0(%rax)
movslq %ecx,%rsi
imul   $0x66666667,%rsi,%rcx
mov    %rcx,%rdi
shr    $0x3f,%rdi
sar    $0x22,%rcx
add    %edi,%ecx
lea    (%rcx,%rcx,1),%edi
lea    (%rdi,%rdi,4),%edi
mov    %esi,%edx
sub    %edi,%edx
add    $0x30,%dl
mov    %dl,0x7(%rsp,%rbx,1)
add    $0xffffffffffffffff,%rbx
cmp    $0x63,%esi
jg     1140 <exponent+0x30>
add    $0x30,%cl
lea    (%rsp,%rbx,1),%rsi
add    $0x7,%rsi
mov    %cl,0x7(%rsp,%rbx,1)
cmp    %r8,%rsi
jae    11b1 <exponent+0xa1>
mov    $0x1,%edx
sub    %rbx,%rdx
mov    %rax,%rdi
call   1030 <memcpy@plt>
sub    %rbx,%r14
add    $0x3,%r14
jmp    11ae <exponent+0x9e>
movb   $0x30,0x2(%r14)
add    $0x30,%cl
mov    %cl,0x3(%r14)
add    $0x4,%r14
mov    %r14,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r14
ret

LLVM IR (-O0):
define i8* @exponent(i8* %0, i32 %1, i8 zeroext %2) {
%4 = alloca i8*
%5 = alloca i32
%6 = alloca i8
%7 = alloca [8 x i8]
%8 = alloca i8*
store i8* %0, i8** %4
store i32 %1, i32* %5
store i8 %2, i8* %6
%9 = load i8, i8* %6
%10 = load i8*, i8** %4
%11 = getelementptr inbounds i8, i8* %10, i32 1
store i8* %11, i8** %4
store i8 %9, i8* %10
%12 = load i32, i32* %5
%13 = icmp slt i32 %12, 0
br i1 %13, label %14, label %19
14: ; preds = %3
%15 = load i32, i32* %5
%16 = sub nsw i32 0, %15
store i32 %16, i32* %5
%17 = load i8*, i8** %4
%18 = getelementptr inbounds i8, i8* %17, i32 1
store i8* %18, i8** %4
store i8 45, i8* %17
br label %22
19: ; preds = %3
%20 = load i8*, i8** %4
%21 = getelementptr inbounds i8, i8* %20, i32 1
store i8* %21, i8** %4
store i8 43, i8* %20
br label %22
22: ; preds = %19, %14
%23 = getelementptr inbounds [8 x i8], [8 x i8]* %7, i64 0, i64 0
%24 = getelementptr inbounds i8, i8* %23, i64 8
store i8* %24, i8** %8
%25 = load i32, i32* %5
%26 = icmp sgt i32 %25, 9
br i1 %26, label %27, label %58
27: ; preds = %22
br label %28
28: ; preds = %35, %27
%29 = load i32, i32* %5
%30 = srem i32 %29, 10
%31 = add nsw i32 %30, 48
%32 = trunc i32 %31 to i8
%33 = load i8*, i8** %8
%34 = getelementptr inbounds i8, i8* %33, i32 -1
store i8* %34, i8** %8
store i8 %32, i8* %34
br label %35
35: ; preds = %28
%36 = load i32, i32* %5
%37 = sdiv i32 %36, 10
store i32 %37, i32* %5
%38 = icmp sgt i32 %37, 9
br i1 %38, label %28, label %39
39: ; preds = %35
%40 = load i32, i32* %5
%41 = add nsw i32 %40, 48
%42 = trunc i32 %41 to i8
%43 = load i8*, i8** %8
%44 = getelementptr inbounds i8, i8* %43, i32 -1
store i8* %44, i8** %8
store i8 %42, i8* %44
br label %45
45: ; preds = %51, %39
%46 = load i8*, i8** %8
%47 = getelementptr inbounds [8 x i8], [8 x i8]* %7, i64 0, i64 0
%48 = getelementptr inbounds i8, i8* %47, i64 8
%49 = icmp ult i8* %46, %48
br i1 %49, label %50, label %57
50: ; preds = %45
br label %51
51: ; preds = %50
%52 = load i8*, i8** %8
%53 = getelementptr inbounds i8, i8* %52, i32 1
store i8* %53, i8** %8
%54 = load i8, i8* %52
%55 = load i8*, i8** %4
%56 = getelementptr inbounds i8, i8* %55, i32 1
store i8* %56, i8** %4
store i8 %54, i8* %55
br label %45
57: ; preds = %45
br label %66
58: ; preds = %22
%59 = load i8*, i8** %4
%60 = getelementptr inbounds i8, i8* %59, i32 1
store i8* %60, i8** %4
store i8 48, i8* %59
%61 = load i32, i32* %5
%62 = add nsw i32 %61, 48
%63 = trunc i32 %62 to i8
%64 = load i8*, i8** %4
%65 = getelementptr inbounds i8, i8* %64, i32 1
store i8* %65, i8** %4
store i8 %63, i8* %64
br label %66
66: ; preds = %58, %57
%67 = load i8*, i8** %4
ret i8* %67
}

LLVM IR (-O2):
define i8* @exponent(i8* writeonly %0, i32 %1, i8 zeroext %2) {
%4 = alloca [8 x i8]
%5 = ptrtoint [8 x i8]* %4 to i64
%6 = getelementptr inbounds [8 x i8], [8 x i8]* %4, i64 0, i64 0
%7 = getelementptr inbounds i8, i8* %0, i64 1
store i8 %2, i8* %0
%8 = icmp slt i32 %1, 0
%9 = sub nsw i32 0, %1
%10 = select i1 %8, i8 45, i8 43
%11 = select i1 %8, i32 %9, i32 %1
%12 = getelementptr i8, i8* %0, i64 2
store i8 %10, i8* %7
%13 = getelementptr inbounds [8 x i8], [8 x i8]* %4, i64 0, i64 8
%14 = icmp sgt i32 %11, 9
br i1 %14, label %15, label %36
15: ; preds = %3, %15
%16 = phi i32 [ %22, %15 ], [ %11, %3 ]
%17 = phi i8* [ %21, %15 ], [ %13, %3 ]
%18 = srem i32 %16, 10
%19 = trunc i32 %18 to i8
%20 = add nsw i8 %19, 48
%21 = getelementptr inbounds i8, i8* %17, i64 -1
store i8 %20, i8* %21
%22 = sdiv i32 %16, 10
%23 = icmp sgt i32 %16, 99
br i1 %23, label %15, label %24
24: ; preds = %15
%25 = ptrtoint i8* %17 to i64
%26 = trunc i32 %22 to i8
%27 = add i8 %26, 48
%28 = getelementptr inbounds i8, i8* %17, i64 -2
store i8 %27, i8* %28
%29 = icmp ult i8* %28, %13
br i1 %29, label %30, label %41
30: ; preds = %24
%31 = add i64 %5, 10
%32 = sub i64 %31, %25
%33 = add i64 %5, 12
%34 = sub i64 %33, %25
%35 = getelementptr i8, i8* %0, i64 %34
br label %41
36: ; preds = %3
%37 = getelementptr inbounds i8, i8* %0, i64 3
store i8 48, i8* %12
%38 = trunc i32 %11 to i8
%39 = add i8 %38, 48
%40 = getelementptr inbounds i8, i8* %0, i64 4
store i8 %39, i8* %37
br label %41
41: ; preds = %30, %24, %36
%42 = phi i8* [ %40, %36 ], [ %12, %24 ], [ %35, %30 ]
ret i8* %42
}