char *cvt(value, ndigits, flags, sign, decpt, ch, length)
double value;
int ndigits, flags, *decpt, ch, *length;
char *sign;
{
  int mode, dsgn;
  char *digits, *bp, *rve;
  if (ch == 'f') {
    mode = 3;
  } else {
    if (ch == 'e' || ch == 'E') {
      ndigits++;
    }
    mode = 2;
  }
  if (value < 0) {
    value = -value;
    *sign = '-';
  } else
    *sign = '\000';
  digits = __dtoa(value, mode, ndigits, decpt, &dsgn, &rve);
  if ((ch != 'g' && ch != 'G') || flags & 0x001) {
    bp = digits + ndigits;
    if (ch == 'f') {
      if (*digits == '0' && value)
        *decpt = -ndigits + 1;
      bp += *decpt;
    }
    if (value == 0)
      rve = bp;
    while (rve < bp)
      *rve++ = '0';
  }
  *length = rve - digits;
  return (digits);
}


x86 assembly (clang, -O0):
<cvt>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
movsd  %xmm0,-0x8(%rbp)
mov    %edi,-0xc(%rbp)
mov    %esi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8d,-0x24(%rbp)
mov    %r9,-0x30(%rbp)
cmpl   $0x66,-0x24(%rbp)
jne    1149 <cvt+0x39>
movl   $0x3,-0x34(%rbp)
jmp    116d <cvt+0x5d>
cmpl   $0x65,-0x24(%rbp)
je     115d <cvt+0x4d>
cmpl   $0x45,-0x24(%rbp)
jne    1166 <cvt+0x56>
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
movl   $0x2,-0x34(%rbp)
xorps  %xmm0,%xmm0
ucomisd -0x8(%rbp),%xmm0
jbe    11a8 <cvt+0x98>
movsd  -0x8(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x8(%rbp)
mov    -0x18(%rbp),%rax
movb   $0x2d,(%rax)
jmp    11af <cvt+0x9f>
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
movsd  -0x8(%rbp),%xmm0
mov    -0x34(%rbp),%edi
mov    -0xc(%rbp),%esi
mov    -0x20(%rbp),%rdx
lea    -0x38(%rbp),%rcx
lea    -0x50(%rbp),%r8
mov    $0x1,%al
call   1030 <__dtoa@plt>
cltq
mov    %rax,-0x40(%rbp)
cmpl   $0x67,-0x24(%rbp)
je     11e7 <cvt+0xd7>
cmpl   $0x47,-0x24(%rbp)
jne    11f6 <cvt+0xe6>
mov    -0x10(%rbp),%eax
and    $0x1,%eax
cmp    $0x0,%eax
je     12ad <cvt+0x19d>
mov    -0x40(%rbp),%rax
movslq -0xc(%rbp),%rcx
add    %rcx,%rax
mov    %rax,-0x48(%rbp)
cmpl   $0x66,-0x24(%rbp)
jne    125e <cvt+0x14e>
mov    -0x40(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x30,%eax
jne    124a <cvt+0x13a>
movsd  -0x8(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    123c <cvt+0x12c>
jp     123c <cvt+0x12c>
jmp    124a <cvt+0x13a>
xor    %ecx,%ecx
sub    -0xc(%rbp),%ecx
add    $0x1,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x20(%rbp),%rax
mov    (%rax),%ecx
mov    -0x48(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x48(%rbp)
movsd  -0x8(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    127e <cvt+0x16e>
jp     127e <cvt+0x16e>
mov    -0x48(%rbp),%rax
mov    %rax,-0x50(%rbp)
jmp    1283 <cvt+0x173>
mov    -0x50(%rbp),%rax
cmp    -0x48(%rbp),%rax
jae    12a8 <cvt+0x198>
mov    -0x50(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x50(%rbp)
movb   $0x30,(%rax)
jmp    1283 <cvt+0x173>
jmp    12ad <cvt+0x19d>
mov    -0x50(%rbp),%rax
mov    -0x40(%rbp),%rcx
sub    %rcx,%rax
mov    %eax,%ecx
mov    -0x30(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x40(%rbp),%rax
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<cvt>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x28,%rsp
mov    %r9,%r14
mov    %r8d,%r13d
mov    %rcx,%r15
mov    %esi,%r12d
mov    %edi,%eax
xor    %edi,%edi
cmp    $0x66,%r8d
sete   %dil
setne  %cl
mov    %r8d,%ebp
and    $0xffffffdf,%ebp
cmp    $0x45,%ebp
sete   %bl
and    %cl,%bl
movzbl %bl,%ebx
add    %eax,%ebx
or     $0x2,%edi
xor    %ecx,%ecx
xorpd  %xmm1,%xmm1
ucomisd %xmm0,%xmm1
mov    $0x2d,%eax
cmovbe %ecx,%eax
jbe    116b <cvt+0x5b>
xorpd  0xe95(%rip),%xmm0
mov    %al,(%rdx)
lea    0xc(%rsp),%rcx
mov    %rsp,%r8
movapd %xmm0,0x10(%rsp)
mov    %ebx,%esi
mov    %r15,%rdx
mov    $0x1,%al
call   1030 <__dtoa@plt>
cltq
test   $0x1,%r12b
jne    119a <cvt+0x8a>
cmp    $0x47,%ebp
jne    119a <cvt+0x8a>
mov    (%rsp),%rdx
jmp    1204 <cvt+0xf4>
movslq %ebx,%rcx
add    %rax,%rcx
cmp    $0x66,%r13d
jne    11c9 <cvt+0xb9>
xorpd  %xmm0,%xmm0
movapd 0x10(%rsp),%xmm1
ucomisd %xmm0,%xmm1
jne    11b8 <cvt+0xa8>
jnp    11d1 <cvt+0xc1>
cmpb   $0x30,(%rax)
jne    11d1 <cvt+0xc1>
mov    $0x1,%edx
sub    %ebx,%edx
mov    %edx,(%r15)
jmp    11d4 <cvt+0xc4>
movapd 0x10(%rsp),%xmm1
jmp    11da <cvt+0xca>
mov    (%r15),%edx
movslq %edx,%rdx
add    %rdx,%rcx
xorpd  %xmm0,%xmm0
ucomisd %xmm0,%xmm1
jne    11fb <cvt+0xeb>
jp     11fb <cvt+0xeb>
mov    %rcx,%rdx
jmp    1204 <cvt+0xf4>
nopl   0x0(%rax,%rax,1)
lea    0x1(%rdx),%rsi
mov    %rsi,(%rsp)
movb   $0x30,(%rdx)
mov    (%rsp),%rdx
cmp    %rcx,%rdx
jb     11f0 <cvt+0xe0>
sub    %eax,%edx
mov    %edx,(%r14)
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i8* @cvt(double %0, i32 %1, i32 %2, i8* %3, i32* %4, i32 %5, i32* %6) {
%8 = alloca double
%9 = alloca i32
%10 = alloca i32
%11 = alloca i8*
%12 = alloca i32*
%13 = alloca i32
%14 = alloca i32*
%15 = alloca i32
%16 = alloca i32
%17 = alloca i8*
%18 = alloca i8*
%19 = alloca i8*
store double %0, double* %8
store i32 %1, i32* %9
store i32 %2, i32* %10
store i8* %3, i8** %11
store i32* %4, i32** %12
store i32 %5, i32* %13
store i32* %6, i32** %14
%20 = load i32, i32* %13
%21 = icmp eq i32 %20, 102
br i1 %21, label %22, label %23
22: ; preds = %7
store i32 3, i32* %15
br label %33
23: ; preds = %7
%24 = load i32, i32* %13
%25 = icmp eq i32 %24, 101
br i1 %25, label %29, label %26
26: ; preds = %23
%27 = load i32, i32* %13
%28 = icmp eq i32 %27, 69
br i1 %28, label %29, label %32
29: ; preds = %26, %23
%30 = load i32, i32* %9
%31 = add nsw i32 %30, 1
store i32 %31, i32* %9
br label %32
32: ; preds = %29, %26
store i32 2, i32* %15
br label %33
33: ; preds = %32, %22
%34 = load double, double* %8
%35 = fcmp olt double %34, 0.000000e+00
br i1 %35, label %36, label %40
36: ; preds = %33
%37 = load double, double* %8
%38 = fneg double %37
store double %38, double* %8
%39 = load i8*, i8** %11
store i8 45, i8* %39
br label %42
40: ; preds = %33
%41 = load i8*, i8** %11
store i8 0, i8* %41
br label %42
42: ; preds = %40, %36
%43 = load double, double* %8
%44 = load i32, i32* %15
%45 = load i32, i32* %9
%46 = load i32*, i32** %12
%47 = call i32 (double, i32, i32, i32*, i32*, i8**, ...) bitcast (i32 (...)* @__dtoa to i32 (double, i32, i32, i32*, i32*, i8**, ...)*)(double %43, i32 %44, i32 %45, i32* %46, i32* %16, i8** %19)
%48 = sext i32 %47 to i64
%49 = inttoptr i64 %48 to i8*
store i8* %49, i8** %17
%50 = load i32, i32* %13
%51 = icmp ne i32 %50, 103
br i1 %51, label %52, label %55
52: ; preds = %42
%53 = load i32, i32* %13
%54 = icmp ne i32 %53, 71
br i1 %54, label %59, label %55
55: ; preds = %52, %42
%56 = load i32, i32* %10
%57 = and i32 %56, 1
%58 = icmp ne i32 %57, 0
br i1 %58, label %59, label %99
59: ; preds = %55, %52
%60 = load i8*, i8** %17
%61 = load i32, i32* %9
%62 = sext i32 %61 to i64
%63 = getelementptr inbounds i8, i8* %60, i64 %62
store i8* %63, i8** %18
%64 = load i32, i32* %13
%65 = icmp eq i32 %64, 102
br i1 %65, label %66, label %85
66: ; preds = %59
%67 = load i8*, i8** %17
%68 = load i8, i8* %67
%69 = sext i8 %68 to i32
%70 = icmp eq i32 %69, 48
br i1 %70, label %71, label %79
71: ; preds = %66
%72 = load double, double* %8
%73 = fcmp une double %72, 0.000000e+00
br i1 %73, label %74, label %79
74: ; preds = %71
%75 = load i32, i32* %9
%76 = sub nsw i32 0, %75
%77 = add nsw i32 %76, 1
%78 = load i32*, i32** %12
store i32 %77, i32* %78
br label %79
79: ; preds = %74, %71, %66
%80 = load i32*, i32** %12
%81 = load i32, i32* %80
%82 = load i8*, i8** %18
%83 = sext i32 %81 to i64
%84 = getelementptr inbounds i8, i8* %82, i64 %83
store i8* %84, i8** %18
br label %85
85: ; preds = %79, %59
%86 = load double, double* %8
%87 = fcmp oeq double %86, 0.000000e+00
br i1 %87, label %88, label %90
88: ; preds = %85
%89 = load i8*, i8** %18
store i8* %89, i8** %19
br label %90
90: ; preds = %88, %85
br label %91
91: ; preds = %95, %90
%92 = load i8*, i8** %19
%93 = load i8*, i8** %18
%94 = icmp ult i8* %92, %93
br i1 %94, label %95, label %98
95: ; preds = %91
%96 = load i8*, i8** %19
%97 = getelementptr inbounds i8, i8* %96, i32 1
store i8* %97, i8** %19
store i8 48, i8* %96
br label %91
98: ; preds = %91
br label %99
99: ; preds = %98, %55
%100 = load i8*, i8** %19
%101 = load i8*, i8** %17
%102 = ptrtoint i8* %100 to i64
%103 = ptrtoint i8* %101 to i64
%104 = sub i64 %102, %103
%105 = trunc i64 %104 to i32
%106 = load i32*, i32** %14
store i32 %105, i32* %106
%107 = load i8*, i8** %17
ret i8* %107
}

LLVM IR (-O2):
define i8* @cvt(double %0, i32 %1, i32 %2, i8* nocapture writeonly %3, i32* %4, i32 %5, i32* nocapture writeonly %6) {
%8 = alloca i32
%9 = alloca i8*
%10 = bitcast i32* %8 to i8*
%11 = bitcast i8** %9 to i8*
%12 = icmp eq i32 %5, 102
%13 = and i32 %5, -33
%14 = icmp eq i32 %13, 69
%15 = xor i1 %12, true
%16 = and i1 %14, %15
%17 = zext i1 %16 to i32
%18 = add nsw i32 %17, %1
%19 = select i1 %12, i32 3, i32 2
%20 = fcmp olt double %0, 0.000000e+00
%21 = fneg double %0
%22 = select i1 %20, i8 45, i8 0
%23 = select i1 %20, double %21, double %0
store i8 %22, i8* %3
%24 = call i32 (double, i32, i32, i32*, i32*, i8**, ...) bitcast (i32 (...)* @__dtoa to i32 (double, i32, i32, i32*, i32*, i8**, ...)*)(double %23, i32 %19, i32 %18, i32* %4, i32* %8, i8** %9)
%25 = sext i32 %24 to i64
%26 = inttoptr i64 %25 to i8*
%27 = icmp eq i32 %13, 71
%28 = and i32 %2, 1
%29 = icmp eq i32 %28, 0
%30 = and i1 %29, %27
br i1 %30, label %31, label %33
31: ; preds = %7
%32 = load i8*, i8** %9
br label %60
33: ; preds = %7
%34 = sext i32 %18 to i64
%35 = getelementptr inbounds i8, i8* %26, i64 %34
br i1 %12, label %36, label %49
36: ; preds = %33
%37 = load i8, i8* %26
%38 = icmp eq i8 %37, 48
%39 = fcmp une double %23, 0.000000e+00
%40 = and i1 %39, %38
br i1 %40, label %43, label %41
41: ; preds = %36
%42 = load i32, i32* %4
br label %45
43: ; preds = %36
%44 = sub i32 1, %18
store i32 %44, i32* %4
br label %45
45: ; preds = %41, %43
%46 = phi i32 [ %42, %41 ], [ %44, %43 ]
%47 = sext i32 %46 to i64
%48 = getelementptr inbounds i8, i8* %35, i64 %47
br label %49
49: ; preds = %45, %33
%50 = phi i8* [ %48, %45 ], [ %35, %33 ]
%51 = fcmp oeq double %23, 0.000000e+00
br i1 %51, label %60, label %52
52: ; preds = %49
%53 = load i8*, i8** %9
%54 = icmp ult i8* %53, %50
br i1 %54, label %55, label %60
55: ; preds = %52, %55
%56 = phi i8* [ %58, %55 ], [ %53, %52 ]
%57 = getelementptr inbounds i8, i8* %56, i64 1
store i8* %57, i8** %9
store i8 48, i8* %56
%58 = load i8*, i8** %9
%59 = icmp ult i8* %58, %50
br i1 %59, label %55, label %60
60: ; preds = %55, %49, %31, %52
%61 = phi i8* [ %32, %31 ], [ %53, %52 ], [ %50, %49 ], [ %58, %55 ]
%62 = ptrtoint i8* %61 to i64
%63 = trunc i64 %62 to i32
%64 = sub i32 %63, %24
store i32 %64, i32* %6
ret i8* %26
}