#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 */
int /*<<< orphan*/ modf(double, double *);
unsigned char *cvtround(double fract, int *exp, unsigned char *start,
                        unsigned char *end, unsigned char ch,
                        unsigned char *negp) {
  double tmp;
  if (fract) {
    modf(fract * 10, &tmp);
  } else {
    tmp = ch - '0';
  }
  if (tmp > 4) {
    for (;; --end) {
      if (*end == '.') {
        --end;
      }
      if (++*end <= '9') {
        break;
      }
      *end = '0';
      if (end == start) {
        if (exp) {
          *end = '1';
          ++*exp;
        } else {
          *--end = '1';
          --start;
        }
        break;
      }
    }
  } else if (*negp) {
    for (;; --end) {
      if (*end == '.') {
        --end;
      }
      if (*end != '0') {
        break;
      }
      if (end == start) {
        *negp = 0;
      }
    }
  }
  return start;
}


x86 assembly (clang, -O0):
<cvtround>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %cl,%al
movsd  %xmm0,-0x8(%rbp)
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    %al,-0x21(%rbp)
mov    %r8,-0x30(%rbp)
movsd  -0x8(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    114f <cvtround+0x3f>
jp     114f <cvtround+0x3f>
jmp    116a <cvtround+0x5a>
movsd  0xea9(%rip),%xmm0
mulsd  -0x8(%rbp),%xmm0
lea    -0x38(%rbp),%rdi
call   1030 <modf@plt>
jmp    117a <cvtround+0x6a>
movzbl -0x21(%rbp),%eax
sub    $0x30,%eax
cvtsi2sd %eax,%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x38(%rbp),%xmm0
movsd  0xe81(%rip),%xmm1
ucomisd %xmm1,%xmm0
jbe    1243 <cvtround+0x133>
jmp    1196 <cvtround+0x86>
mov    -0x20(%rbp),%rax
movzbl (%rax),%eax
cmp    $0x2e,%eax
jne    11b2 <cvtround+0xa2>
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rcx
mov    (%rcx),%al
add    $0x1,%al
mov    %al,(%rcx)
movzbl %al,%eax
cmp    $0x39,%eax
jg     11cd <cvtround+0xbd>
jmp    123e <cvtround+0x12e>
mov    -0x20(%rbp),%rax
movb   $0x30,(%rax)
mov    -0x20(%rbp),%rax
cmp    -0x18(%rbp),%rax
jne    1228 <cvtround+0x118>
cmpq   $0x0,-0x10(%rbp)
je     1204 <cvtround+0xf4>
mov    -0x20(%rbp),%rax
movb   $0x31,(%rax)
mov    -0x10(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
jmp    1223 <cvtround+0x113>
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0xffffffffffffffff,%rcx
mov    %rcx,-0x20(%rbp)
movb   $0x31,-0x1(%rax)
mov    -0x18(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x18(%rbp)
jmp    123e <cvtround+0x12e>
jmp    122d <cvtround+0x11d>
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
jmp    1196 <cvtround+0x86>
jmp    12bb <cvtround+0x1ab>
mov    -0x30(%rbp),%rax
cmpb   $0x0,(%rax)
je     12b6 <cvtround+0x1a6>
jmp    1255 <cvtround+0x145>
mov    -0x20(%rbp),%rax
movzbl (%rax),%eax
cmp    $0x2e,%eax
jne    1271 <cvtround+0x161>
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
movzbl (%rax),%eax
cmp    $0x30,%eax
je     1286 <cvtround+0x176>
jmp    12b1 <cvtround+0x1a1>
mov    -0x20(%rbp),%rax
cmp    -0x18(%rbp),%rax
jne    129b <cvtround+0x18b>
mov    -0x30(%rbp),%rax
movb   $0x0,(%rax)
jmp    12a0 <cvtround+0x190>
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
jmp    1255 <cvtround+0x145>
jmp    12b6 <cvtround+0x1a6>
jmp    12bb <cvtround+0x1ab>
mov    -0x18(%rbp),%rax
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<cvtround>:
push   %r15
push   %r14
push   %r12
push   %rbx
push   %rax
mov    %r8,%r12
mov    %rdx,%rbx
mov    %rsi,%r15
mov    %rdi,%r14
xorpd  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    1130 <cvtround+0x20>
jnp    11a7 <cvtround+0x97>
mulsd  0xec8(%rip),%xmm0
mov    %rsp,%rdi
call   1030 <modf@plt>
movsd  (%rsp),%xmm0
ucomisd 0xebb(%rip),%xmm0
jbe    11be <cvtround+0xae>
xor    %ecx,%ecx
cmpb   $0x2e,(%rbx)
sete   %cl
mov    %rbx,%rax
sub    %rcx,%rax
neg    %rcx
mov    (%rax),%dl
add    $0x1,%dl
mov    %dl,(%rbx,%rcx,1)
cmp    $0x3a,%dl
jb     1219 <cvtround+0x109>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movb   $0x30,(%rax)
cmp    %r15,%rax
je     1201 <cvtround+0xf1>
xor    %ecx,%ecx
cmpb   $0x2e,-0x1(%rax)
lea    -0x1(%rax),%rax
sete   %cl
sub    %rcx,%rax
movzbl (%rax),%ecx
add    $0x1,%cl
mov    %cl,(%rax)
cmp    $0x3a,%cl
jae    1180 <cvtround+0x70>
jmp    1219 <cvtround+0x109>
movzbl %cl,%eax
add    $0xffffffd0,%eax
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
ucomisd 0xe4c(%rip),%xmm0
ja     114f <cvtround+0x3f>
cmpb   $0x0,(%r12)
je     1219 <cvtround+0x109>
xor    %eax,%eax
cmpb   $0x2e,(%rbx)
sete   %al
mov    %rax,%rcx
neg    %rcx
cmpb   $0x30,(%rbx,%rcx,1)
jne    1219 <cvtround+0x109>
sub    %rax,%rbx
jmp    11f5 <cvtround+0xe5>
xchg   %ax,%ax
xor    %eax,%eax
cmpb   $0x2e,-0x1(%rbx)
lea    -0x1(%rbx),%rbx
sete   %al
sub    %rax,%rbx
cmpb   $0x30,(%rbx)
jne    1219 <cvtround+0x109>
cmp    %r15,%rbx
jne    11e0 <cvtround+0xd0>
movb   $0x0,(%r12)
jmp    11e0 <cvtround+0xd0>
test   %r14,%r14
je     1210 <cvtround+0x100>
movb   $0x31,(%r15)
addl   $0x1,(%r14)
jmp    1219 <cvtround+0x109>
movb   $0x31,-0x1(%r15)
add    $0xffffffffffffffff,%r15
mov    %r15,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

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

LLVM IR (-O2):
define i8* @cvtround(double %0, i32* %1, i8* readnone %2, i8* %3, i8 zeroext %4, i8* nocapture %5) {
%7 = alloca double
%8 = bitcast double* %7 to i8*
%9 = fcmp une double %0, 0.000000e+00
br i1 %9, label %10, label %14
10: ; preds = %6
%11 = fmul double %0, 1.000000e+01
%12 = call i32 @modf(double %11, double* %7)
%13 = load double, double* %7
br label %18
14: ; preds = %6
%15 = zext i8 %4 to i32
%16 = add nsw i32 %15, -48
%17 = sitofp i32 %16 to double
br label %18
18: ; preds = %14, %10
%19 = phi double [ %17, %14 ], [ %13, %10 ]
%20 = fcmp ogt double %19, 4.000000e+00
br i1 %20, label %21, label %48
21: ; preds = %18
%22 = load i8, i8* %3
%23 = icmp eq i8 %22, 46
%24 = sext i1 %23 to i64
%25 = getelementptr i8, i8* %3, i64 %24
%26 = load i8, i8* %25
%27 = add i8 %26, 1
store i8 %27, i8* %25
%28 = icmp ult i8 %27, 58
br i1 %28, label %70, label %29
29: ; preds = %21, %39
%30 = phi i8* [ %44, %39 ], [ %25, %21 ]
store i8 48, i8* %30
%31 = icmp eq i8* %30, %2
br i1 %31, label %32, label %39
32: ; preds = %29
%33 = icmp eq i32* %1, null
br i1 %33, label %37, label %34
34: ; preds = %32
store i8 49, i8* %2
%35 = load i32, i32* %1
%36 = add nsw i32 %35, 1
store i32 %36, i32* %1
br label %70
37: ; preds = %32
%38 = getelementptr inbounds i8, i8* %2, i64 -1
store i8 49, i8* %38
br label %70
39: ; preds = %29
%40 = getelementptr inbounds i8, i8* %30, i64 -1
%41 = load i8, i8* %40
%42 = icmp eq i8 %41, 46
%43 = sext i1 %42 to i64
%44 = getelementptr i8, i8* %40, i64 %43
%45 = load i8, i8* %44
%46 = add i8 %45, 1
store i8 %46, i8* %44
%47 = icmp ult i8 %46, 58
br i1 %47, label %70, label %29
48: ; preds = %18
%49 = load i8, i8* %5
%50 = icmp eq i8 %49, 0
br i1 %50, label %70, label %51
51: ; preds = %48
%52 = load i8, i8* %3
%53 = icmp eq i8 %52, 46
%54 = sext i1 %53 to i64
%55 = getelementptr i8, i8* %3, i64 %54
%56 = load i8, i8* %55
%57 = icmp eq i8 %56, 48
br i1 %57, label %58, label %70
58: ; preds = %51, %62
%59 = phi i8* [ %67, %62 ], [ %55, %51 ]
%60 = icmp eq i8* %59, %2
br i1 %60, label %61, label %62
61: ; preds = %58
store i8 0, i8* %5
br label %62
62: ; preds = %58, %61
%63 = getelementptr inbounds i8, i8* %59, i64 -1
%64 = load i8, i8* %63
%65 = icmp eq i8 %64, 46
%66 = sext i1 %65 to i64
%67 = getelementptr i8, i8* %63, i64 %66
%68 = load i8, i8* %67
%69 = icmp eq i8 %68, 48
br i1 %69, label %58, label %70
70: ; preds = %62, %39, %51, %21, %48, %37, %34
%71 = phi i8* [ %2, %34 ], [ %38, %37 ], [ %2, %48 ], [ %2, %21 ], [ %2, %51 ], [ %2, %39 ], [ %2, %62 ]
ret i8* %71
}