#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
char *_fcvt(double, int, int *, int *);
char *_pfloat(double r, register char *s, int n, int flags) {
  register char *s1;
  int sign, dp;
  register int i;
  s1 = _fcvt(r, n, &dp, &sign);
  if (sign)
    *s++ = '-';
  else if (flags & 0x0002)
    *s++ = '+';
  else if (flags & 0x0004)
    *s++ = ' ';
  if (dp <= 0)
    *s++ = '0';
  for (i = dp; i > 0; i--)
    if (*s1)
      *s++ = *s1++;
    else
      *s++ = '0';
  if (((i = n) > 0) || (flags & 0x0008))
    *s++ = '.';
  while (++dp <= 0) {
    if (--i < 0)
      break;
    *s++ = '0';
  }
  while (--i >= 0)
    if (*s1)
      *s++ = *s1++;
    else
      *s++ = '0';
  return s;
}


x86 assembly (clang, -O0):
<_pfloat>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
movsd  %xmm0,-0x8(%rbp)
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    %edx,-0x18(%rbp)
movsd  -0x8(%rbp),%xmm0
mov    -0x14(%rbp),%edi
lea    -0x28(%rbp),%rsi
lea    -0x24(%rbp),%rdx
call   1030 <_fcvt@plt>
mov    %rax,-0x20(%rbp)
cmpl   $0x0,-0x24(%rbp)
je     1161 <_pfloat+0x51>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movb   $0x2d,(%rax)
jmp    11b2 <_pfloat+0xa2>
mov    -0x18(%rbp),%eax
and    $0x2,%eax
cmp    $0x0,%eax
je     1187 <_pfloat+0x77>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movb   $0x2b,(%rax)
jmp    11ad <_pfloat+0x9d>
mov    -0x18(%rbp),%eax
and    $0x4,%eax
cmp    $0x0,%eax
je     11a8 <_pfloat+0x98>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movb   $0x20,(%rax)
jmp    11ad <_pfloat+0x9d>
jmp    11b2 <_pfloat+0xa2>
cmpl   $0x0,-0x28(%rbp)
jg     11ce <_pfloat+0xbe>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movb   $0x30,(%rax)
mov    -0x28(%rbp),%eax
mov    %eax,-0x2c(%rbp)
cmpl   $0x0,-0x2c(%rbp)
jle    1237 <_pfloat+0x127>
mov    -0x20(%rbp),%rax
cmpb   $0x0,(%rax)
je     1212 <_pfloat+0x102>
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x20(%rbp)
mov    (%rax),%cl
mov    -0x10(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x10(%rbp)
mov    %cl,(%rax)
jmp    1224 <_pfloat+0x114>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movb   $0x30,(%rax)
jmp    1229 <_pfloat+0x119>
mov    -0x2c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x2c(%rbp)
jmp    11d4 <_pfloat+0xc4>
mov    -0x14(%rbp),%eax
mov    %eax,-0x2c(%rbp)
cmp    $0x0,%eax
jg     1255 <_pfloat+0x145>
mov    -0x18(%rbp),%eax
and    $0x8,%eax
cmp    $0x0,%eax
je     1267 <_pfloat+0x157>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movb   $0x2e,(%rax)
jmp    126c <_pfloat+0x15c>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
cmp    $0x0,%eax
jg     12ac <_pfloat+0x19c>
mov    -0x2c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x2c(%rbp)
cmp    $0x0,%eax
jge    1295 <_pfloat+0x185>
jmp    12ac <_pfloat+0x19c>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movb   $0x30,(%rax)
jmp    126c <_pfloat+0x15c>
jmp    12b1 <_pfloat+0x1a1>
mov    -0x2c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x2c(%rbp)
cmp    $0x0,%eax
jl     130e <_pfloat+0x1fe>
mov    -0x20(%rbp),%rax
cmpb   $0x0,(%rax)
je     12f7 <_pfloat+0x1e7>
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x20(%rbp)
mov    (%rax),%cl
mov    -0x10(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x10(%rbp)
mov    %cl,(%rax)
jmp    1309 <_pfloat+0x1f9>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movb   $0x30,(%rax)
jmp    12b1 <_pfloat+0x1a1>
mov    -0x10(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<_pfloat>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
mov    %edx,%r15d
mov    %esi,%r14d
mov    %rdi,%rbx
mov    %rsp,%rsi
lea    0x4(%rsp),%rdx
mov    %r14d,%edi
call   1030 <_fcvt@plt>
mov    $0x2d,%cl
cmpl   $0x0,0x4(%rsp)
jne    1149 <_pfloat+0x39>
mov    $0x2b,%cl
test   $0x2,%r15b
jne    1149 <_pfloat+0x39>
mov    $0x20,%cl
test   $0x4,%r15b
je     114f <_pfloat+0x3f>
mov    %cl,(%rbx)
add    $0x1,%rbx
mov    (%rsp),%edx
test   %edx,%edx
jle    1164 <_pfloat+0x54>
test   $0x1,%dl
jne    116d <_pfloat+0x5d>
mov    %edx,%ecx
cmp    $0x1,%edx
jne    1192 <_pfloat+0x82>
jmp    11d5 <_pfloat+0xc5>
movb   $0x30,(%rbx)
add    $0x1,%rbx
jmp    11d5 <_pfloat+0xc5>
movzbl (%rax),%ecx
xor    %esi,%esi
test   %cl,%cl
setne  %sil
mov    $0x30,%edi
cmovne %ecx,%edi
add    %rsi,%rax
mov    %dil,(%rbx)
add    $0x1,%rbx
lea    -0x1(%rdx),%ecx
cmp    $0x1,%edx
je     11d5 <_pfloat+0xc5>
add    $0xffffffff,%ecx
mov    $0x30,%edx
nopw   0x0(%rax,%rax,1)
movzbl (%rax),%esi
xor    %edi,%edi
test   %sil,%sil
setne  %dil
cmove  %edx,%esi
lea    (%rax,%rdi,1),%rbp
mov    %sil,(%rbx)
movzbl (%rax,%rdi,1),%esi
xor    %eax,%eax
test   %sil,%sil
setne  %al
cmove  %edx,%esi
add    %rbp,%rax
mov    %sil,0x1(%rbx)
add    $0x2,%rbx
add    $0xfffffffe,%ecx
jb     11a0 <_pfloat+0x90>
test   %r14d,%r14d
jg     11e0 <_pfloat+0xd0>
and    $0x8,%r15d
je     11e7 <_pfloat+0xd7>
movb   $0x2e,(%rbx)
add    $0x1,%rbx
mov    (%rsp),%ecx
lea    0x1(%rcx),%edx
mov    %edx,(%rsp)
test   %ecx,%ecx
jns    1221 <_pfloat+0x111>
xor    %ecx,%ecx
test   %r14d,%r14d
cmovs  %r14d,%ecx
add    $0xffffffff,%ecx
test   %r14d,%r14d
jle    12a7 <_pfloat+0x197>
movb   $0x30,(%rbx)
add    $0x1,%rbx
mov    (%rsp),%edx
lea    0x1(%rdx),%esi
mov    %esi,(%rsp)
add    $0xffffffff,%r14d
test   %edx,%edx
js     1200 <_pfloat+0xf0>
test   %r14d,%r14d
jle    12b3 <_pfloat+0x1a3>
test   $0x1,%r14b
jne    123b <_pfloat+0x12b>
mov    %r14d,%ecx
cmp    $0x1,%r14d
jne    1262 <_pfloat+0x152>
jmp    12b3 <_pfloat+0x1a3>
lea    -0x1(%r14),%ecx
movzbl (%rax),%edx
xor    %esi,%esi
test   %dl,%dl
mov    $0x30,%edi
cmovne %edx,%edi
setne  %sil
add    %rsi,%rax
mov    %dil,(%rbx)
add    $0x1,%rbx
cmp    $0x1,%r14d
je     12b3 <_pfloat+0x1a3>
add    $0xffffffff,%ecx
mov    $0x30,%edx
nopw   0x0(%rax,%rax,1)
movzbl (%rax),%esi
xor    %edi,%edi
test   %sil,%sil
setne  %dil
cmove  %edx,%esi
lea    (%rax,%rdi,1),%rbp
mov    %sil,(%rbx)
movzbl (%rax,%rdi,1),%esi
xor    %eax,%eax
test   %sil,%sil
setne  %al
cmove  %edx,%esi
add    %rbp,%rax
mov    %sil,0x1(%rbx)
add    $0x2,%rbx
add    $0xfffffffe,%ecx
jb     1270 <_pfloat+0x160>
jmp    12b3 <_pfloat+0x1a3>
mov    %ecx,%r14d
test   %r14d,%r14d
jg     122a <_pfloat+0x11a>
mov    %rbx,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define i8* @_pfloat(double %0, i8* writeonly %1, i32 %2, i32 %3) {
%5 = alloca i32
%6 = alloca i32
%7 = bitcast i32* %5 to i8*
%8 = bitcast i32* %6 to i8*
%9 = call i8* @_fcvt(double %0, i32 %2, i32* %6, i32* %5)
%10 = load i32, i32* %5
%11 = icmp eq i32 %10, 0
br i1 %11, label %12, label %18
12: ; preds = %4
%13 = and i32 %3, 2
%14 = icmp eq i32 %13, 0
br i1 %14, label %15, label %18
15: ; preds = %12
%16 = and i32 %3, 4
%17 = icmp eq i32 %16, 0
br i1 %17, label %21, label %18
18: ; preds = %15, %12, %4
%19 = phi i8 [ 45, %4 ], [ 43, %12 ], [ 32, %15 ]
%20 = getelementptr inbounds i8, i8* %1, i64 1
store i8 %19, i8* %1
br label %21
21: ; preds = %18, %15
%22 = phi i8* [ %1, %15 ], [ %20, %18 ]
%23 = load i32, i32* %6
%24 = icmp slt i32 %23, 1
br i1 %24, label %44, label %25
25: ; preds = %21
%26 = and i32 %23, 1
%27 = icmp eq i32 %26, 0
br i1 %27, label %37, label %28
28: ; preds = %25
%29 = load i8, i8* %9
%30 = icmp eq i8 %29, 0
%31 = select i1 %30, i8 48, i8 %29
%32 = xor i1 %30, true
%33 = zext i1 %32 to i64
%34 = getelementptr i8, i8* %9, i64 %33
%35 = getelementptr inbounds i8, i8* %22, i64 1
store i8 %31, i8* %22
%36 = add nsw i32 %23, -1
br label %37
37: ; preds = %28, %25
%38 = phi i32 [ %23, %25 ], [ %36, %28 ]
%39 = phi i8* [ %9, %25 ], [ %34, %28 ]
%40 = phi i8* [ %22, %25 ], [ %35, %28 ]
%41 = phi i8* [ undef, %25 ], [ %34, %28 ]
%42 = phi i8* [ undef, %25 ], [ %35, %28 ]
%43 = icmp eq i32 %23, 1
br i1 %43, label %67, label %46
44: ; preds = %21
%45 = getelementptr inbounds i8, i8* %22, i64 1
store i8 48, i8* %22
br label %67
46: ; preds = %37, %46
%47 = phi i32 [ %64, %46 ], [ %38, %37 ]
%48 = phi i8* [ %62, %46 ], [ %39, %37 ]
%49 = phi i8* [ %63, %46 ], [ %40, %37 ]
%50 = load i8, i8* %48
%51 = icmp eq i8 %50, 0
%52 = select i1 %51, i8 48, i8 %50
%53 = xor i1 %51, true
%54 = zext i1 %53 to i64
%55 = getelementptr i8, i8* %48, i64 %54
%56 = getelementptr inbounds i8, i8* %49, i64 1
store i8 %52, i8* %49
%57 = load i8, i8* %55
%58 = icmp eq i8 %57, 0
%59 = select i1 %58, i8 48, i8 %57
%60 = xor i1 %58, true
%61 = zext i1 %60 to i64
%62 = getelementptr i8, i8* %55, i64 %61
%63 = getelementptr inbounds i8, i8* %49, i64 2
store i8 %59, i8* %56
%64 = add nsw i32 %47, -2
%65 = add i32 %47, -3
%66 = icmp ult i32 %65, -2
br i1 %66, label %46, label %67
67: ; preds = %37, %46, %44
%68 = phi i8* [ %45, %44 ], [ %42, %37 ], [ %63, %46 ]
%69 = phi i8* [ %9, %44 ], [ %41, %37 ], [ %62, %46 ]
%70 = icmp slt i32 %2, 1
%71 = and i32 %3, 8
%72 = icmp eq i32 %71, 0
%73 = and i1 %70, %72
br i1 %73, label %76, label %74
74: ; preds = %67
%75 = getelementptr inbounds i8, i8* %68, i64 1
store i8 46, i8* %68
br label %76
76: ; preds = %67, %74
%77 = phi i8* [ %75, %74 ], [ %68, %67 ]
%78 = load i32, i32* %6
%79 = add nsw i32 %78, 1
store i32 %79, i32* %6
%80 = icmp slt i32 %78, 0
br i1 %80, label %81, label %94
81: ; preds = %76
%82 = call i32 @llvm.smin.i32(i32 %2, i32 0)
%83 = add i32 %82, -1
br label %84
84: ; preds = %81, %89
%85 = phi i32 [ %87, %89 ], [ %2, %81 ]
%86 = phi i8* [ %90, %89 ], [ %77, %81 ]
%87 = add nsw i32 %85, -1
%88 = icmp slt i32 %85, 1
br i1 %88, label %94, label %89
89: ; preds = %84
%90 = getelementptr inbounds i8, i8* %86, i64 1
store i8 48, i8* %86
%91 = load i32, i32* %6
%92 = add nsw i32 %91, 1
store i32 %92, i32* %6
%93 = icmp slt i32 %91, 0
br i1 %93, label %84, label %94
94: ; preds = %89, %84, %76
%95 = phi i8* [ %77, %76 ], [ %90, %89 ], [ %86, %84 ]
%96 = phi i32 [ %2, %76 ], [ %87, %89 ], [ %83, %84 ]
%97 = icmp sgt i32 %96, 0
br i1 %97, label %98, label %137
98: ; preds = %94
%99 = and i32 %96, 1
%100 = icmp eq i32 %99, 0
br i1 %100, label %110, label %101
101: ; preds = %98
%102 = add nsw i32 %96, -1
%103 = load i8, i8* %69
%104 = icmp eq i8 %103, 0
%105 = select i1 %104, i8 48, i8 %103
%106 = xor i1 %104, true
%107 = zext i1 %106 to i64
%108 = getelementptr i8, i8* %69, i64 %107
%109 = getelementptr inbounds i8, i8* %95, i64 1
store i8 %105, i8* %95
br label %110
110: ; preds = %101, %98
%111 = phi i32 [ %96, %98 ], [ %102, %101 ]
%112 = phi i8* [ %69, %98 ], [ %108, %101 ]
%113 = phi i8* [ %95, %98 ], [ %109, %101 ]
%114 = phi i8* [ undef, %98 ], [ %109, %101 ]
%115 = icmp eq i32 %96, 1
br i1 %115, label %137, label %116
116: ; preds = %110, %116
%117 = phi i32 [ %127, %116 ], [ %111, %110 ]
%118 = phi i8* [ %133, %116 ], [ %112, %110 ]
%119 = phi i8* [ %134, %116 ], [ %113, %110 ]
%120 = load i8, i8* %118
%121 = icmp eq i8 %120, 0
%122 = select i1 %121, i8 48, i8 %120
%123 = xor i1 %121, true
%124 = zext i1 %123 to i64
%125 = getelementptr i8, i8* %118, i64 %124
%126 = getelementptr inbounds i8, i8* %119, i64 1
store i8 %122, i8* %119
%127 = add nsw i32 %117, -2
%128 = load i8, i8* %125
%129 = icmp eq i8 %128, 0
%130 = select i1 %129, i8 48, i8 %128
%131 = xor i1 %129, true
%132 = zext i1 %131 to i64
%133 = getelementptr i8, i8* %125, i64 %132
%134 = getelementptr inbounds i8, i8* %119, i64 2
store i8 %130, i8* %126
%135 = add i32 %117, -3
%136 = icmp ult i32 %135, -2
br i1 %136, label %116, label %137
137: ; preds = %110, %116, %94
%138 = phi i8* [ %95, %94 ], [ %114, %110 ], [ %134, %116 ]
ret i8* %138
}