#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*/ sprintf(char *, char *, double);
int /*<<< orphan*/ sscanf(char *, char *, double *);
scalar_t__ strlen(char *);
int /*<<< orphan*/ strncpy(char *, char *, int);
double ckround(double fpnum, int places, char *obuf, int obuflen) {
  char *s, *s2, *d;
  int i, p, len, x, n, digits;
  int carry = 0;
  int minus = 0;
  char buf[200];
  char *number;
  double value;
  extern int fp_digits;
  sprintf(buf, "%200.100f", fpnum);
  number = (char *)buf;
  p = places;
  d = (char *)0;
  s = number;
  while (*s == ' ' || *s == '\011')
    s++;
  if (*s == '+')
    s++;
  number = s;
  if (*s == '-') {
    minus++;
    number++;
    s++;
  }
  s = number;
  n = 0;
  while (*s && *s != '.')
    s++, n++;
  if (p + n > fp_digits)
    p = fp_digits - n;
  if (p < 0)
    p = 0;
  if (n > fp_digits)
    *s = 0;
  else
    number[fp_digits + 1] = 0;
  len = (int)strlen(number);
  d = s;
  if (p > 0) {
    if (n + p < len) {
      if (*s == '.')
        s++;
      s += p;
      if (*s > '4' && *s <= '9')
        carry = 1;
      *s = 0;
      s--;
    }
  } else if (p == 0) {
    if (*s == '.') {
      *s = 0;
      if (*(s + 1)) {
        if (*(s + 1) > '4' && *(s + 1) <= '9')
          carry = 1;
      }
      s--;
    }
  } else {
    if (s + p > number) {
      s += p;
      *d = 0;
      carry = 0;
      if (*s > '4')
        carry = 1;
      s2 = s;
      while (s2 < d)
        *s2++ = '0';
      s--;
    }
  }
  if (carry) {
    while (s >= number) {
      if (*s == '.') {
        s--;
        continue;
      }
      *s += 1;
      carry = 0;
      if (*s <= '9')
        break;
      *s = '0';
      carry = 1;
      s--;
    }
  }
  sscanf(number, "%lf", &value);
  if (obuf)
    strncpy(obuf, number, obuflen);
  return (value);
}


x86 assembly (clang, -O0):
<ckround>:
push   %rbp
mov    %rsp,%rbp
sub    $0x140,%rsp
movsd  %xmm0,-0x8(%rbp)
mov    %edi,-0xc(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
movl   $0x0,-0x54(%rbp)
movl   $0x0,-0x58(%rbp)
lea    -0x120(%rbp),%rdi
movsd  -0x8(%rbp),%xmm0
lea    0xe85(%rip),%rsi
call   1060 <sprintf@plt>
lea    -0x120(%rbp),%rax
mov    %rax,-0x128(%rbp)
mov    -0xc(%rbp),%eax
mov    %eax,-0x40(%rbp)
movq   $0x0,-0x38(%rbp)
mov    -0x128(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%ecx
mov    $0x1,%al
cmp    $0x20,%ecx
mov    %al,-0x131(%rbp)
je     11d2 <ckround+0x92>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x9,%eax
sete   %al
mov    %al,-0x131(%rbp)
mov    -0x131(%rbp),%al
test   $0x1,%al
jne    11e5 <ckround+0xa5>
jmp    11f6 <ckround+0xb6>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    11a7 <ckround+0x67>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2b,%eax
jne    1212 <ckround+0xd2>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
mov    %rax,-0x128(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
jne    1254 <ckround+0x114>
mov    -0x58(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x58(%rbp)
mov    -0x128(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x128(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x128(%rbp),%rax
mov    %rax,-0x28(%rbp)
movl   $0x0,-0x4c(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x132(%rbp)
je     1291 <ckround+0x151>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
setne  %al
mov    %al,-0x132(%rbp)
mov    -0x132(%rbp),%al
test   $0x1,%al
jne    12a4 <ckround+0x164>
jmp    12be <ckround+0x17e>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x4c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x4c(%rbp)
jmp    1266 <ckround+0x126>
mov    -0x40(%rbp),%eax
add    -0x4c(%rbp),%eax
mov    0x2d0d(%rip),%rcx
cmp    (%rcx),%eax
jle    12e2 <ckround+0x1a2>
mov    0x2cfe(%rip),%rax
mov    (%rax),%eax
sub    -0x4c(%rbp),%eax
mov    %eax,-0x40(%rbp)
cmpl   $0x0,-0x40(%rbp)
jge    12f3 <ckround+0x1b3>
movl   $0x0,-0x40(%rbp)
mov    -0x4c(%rbp),%eax
mov    0x2cdb(%rip),%rcx
cmp    (%rcx),%eax
jle    1311 <ckround+0x1d1>
mov    -0x28(%rbp),%rax
movb   $0x0,(%rax)
jmp    132b <ckround+0x1eb>
mov    -0x128(%rbp),%rax
mov    0x2cb9(%rip),%rcx
mov    (%rcx),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movb   $0x0,(%rax,%rcx,1)
mov    -0x128(%rbp),%rdi
call   1040 <strlen@plt>
mov    %eax,-0x44(%rbp)
mov    -0x28(%rbp),%rax
mov    %rax,-0x38(%rbp)
cmpl   $0x0,-0x40(%rbp)
jle    13c7 <ckround+0x287>
mov    -0x4c(%rbp),%eax
add    -0x40(%rbp),%eax
cmp    -0x44(%rbp),%eax
jge    13c2 <ckround+0x282>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
jne    1377 <ckround+0x237>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x40(%rbp),%ecx
mov    -0x28(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x34,%eax
jle    13af <ckround+0x26f>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x39,%eax
jg     13af <ckround+0x26f>
movl   $0x1,-0x54(%rbp)
mov    -0x28(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
jmp    14c6 <ckround+0x386>
cmpl   $0x0,-0x40(%rbp)
jne    1435 <ckround+0x2f5>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
jne    1430 <ckround+0x2f0>
mov    -0x28(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x28(%rbp),%rax
cmpb   $0x0,0x1(%rax)
je     1424 <ckround+0x2e4>
mov    -0x28(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x34,%eax
jle    141f <ckround+0x2df>
mov    -0x28(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x39,%eax
jg     141f <ckround+0x2df>
movl   $0x1,-0x54(%rbp)
jmp    1424 <ckround+0x2e4>
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
jmp    14c1 <ckround+0x381>
mov    -0x28(%rbp),%rax
movslq -0x40(%rbp),%rcx
add    %rcx,%rax
cmp    -0x128(%rbp),%rax
jbe    14bc <ckround+0x37c>
mov    -0x40(%rbp),%ecx
mov    -0x28(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x28(%rbp)
mov    -0x38(%rbp),%rax
movb   $0x0,(%rax)
movl   $0x0,-0x54(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x34,%eax
jle    1483 <ckround+0x343>
movl   $0x1,-0x54(%rbp)
mov    -0x28(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rax
cmp    -0x38(%rbp),%rax
jae    14b0 <ckround+0x370>
mov    -0x30(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x30(%rbp)
movb   $0x30,(%rax)
jmp    148b <ckround+0x34b>
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
jmp    14c1 <ckround+0x381>
jmp    14c6 <ckround+0x386>
cmpl   $0x0,-0x54(%rbp)
je     1553 <ckround+0x413>
jmp    14d5 <ckround+0x395>
mov    -0x28(%rbp),%rax
cmp    -0x128(%rbp),%rax
jb     154e <ckround+0x40e>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
jne    1507 <ckround+0x3c7>
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
jmp    14d5 <ckround+0x395>
mov    -0x28(%rbp),%rax
movsbl (%rax),%ecx
add    $0x1,%ecx
mov    %cl,(%rax)
movl   $0x0,-0x54(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x39,%eax
jg     152f <ckround+0x3ef>
jmp    154e <ckround+0x40e>
mov    -0x28(%rbp),%rax
movb   $0x30,(%rax)
movl   $0x1,-0x54(%rbp)
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
jmp    14d5 <ckround+0x395>
jmp    1553 <ckround+0x413>
mov    -0x128(%rbp),%rdi
lea    0xaa9(%rip),%rsi
lea    -0x130(%rbp),%rdx
call   1050 <sscanf@plt>
cmpq   $0x0,-0x18(%rbp)
je     158b <ckround+0x44b>
mov    -0x18(%rbp),%rdi
mov    -0x128(%rbp),%rsi
mov    -0x1c(%rbp),%edx
call   1030 <strncpy@plt>
movsd  -0x130(%rbp),%xmm0
ff
add    $0x140,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ckround>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0xd8,%rsp
mov    %edx,0x4(%rsp)
mov    %rsi,%r15
mov    %edi,%r13d
lea    0xe9e(%rip),%rsi
lea    0x10(%rsp),%rdi
call   1060 <sprintf@plt>
lea    0x11(%rsp),%rax
jmp    1184 <ckround+0x44>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
add    $0x1,%rax
movzbl -0x1(%rax),%ecx
cmp    $0x9,%cl
je     1180 <ckround+0x40>
cmp    $0x20,%cl
je     1180 <ckround+0x40>
cmp    $0x2b,%cl
jne    119b <ckround+0x5b>
mov    (%rax),%cl
jmp    119f <ckround+0x5f>
add    $0xffffffffffffffff,%rax
xor    %r12d,%r12d
cmp    $0x2d,%cl
sete   %r12b
add    %rax,%r12
xor    %ebp,%ebp
xor    %ebx,%ebx
movzbl (%r12,%rbp,1),%eax
test   %al,%al
je     11ca <ckround+0x8a>
cmp    $0x2e,%al
je     11ca <ckround+0x8a>
add    $0x1,%r13d
add    $0xffffffff,%ebx
add    $0x1,%rbp
jmp    11b0 <ckround+0x70>
mov    0x2e07(%rip),%rax
movslq (%rax),%r14
cmp    %r13d,%r14d
mov    %r13d,%eax
cmovl  %r14d,%eax
sub    %ebp,%eax
lea    (%r12,%rbp,1),%rcx
cmp    %ebp,%r14d
lea    0x1(%r14,%r12,1),%rdx
cmovl  %rcx,%rdx
movb   $0x0,(%rdx)
test   %eax,%eax
jle    124d <ckround+0x10d>
mov    %r12,%rdi
call   1040 <strlen@plt>
cmp    %r13d,%r14d
mov    %r13d,%edx
cmovl  %r14d,%edx
add    %ebx,%edx
xor    %ecx,%ecx
test   %edx,%edx
cmovle %ecx,%edx
add    %ebp,%edx
cmp    %eax,%edx
jge    128b <ckround+0x14b>
xor    %eax,%eax
cmpb   $0x2e,(%r12,%rbp,1)
sete   %al
cmp    %r13d,%r14d
cmovl  %r14d,%r13d
add    %ebx,%r13d
test   %r13d,%r13d
cmovg  %r13d,%ecx
add    %rax,%rcx
add    %r12,%rcx
mov    0x0(%rbp,%rcx,1),%al
add    $0xcb,%al
movb   $0x0,0x0(%rbp,%rcx,1)
cmp    $0x5,%al
jae    128b <ckround+0x14b>
add    %rbp,%rcx
jmp    1282 <ckround+0x142>
cmpb   $0x2e,(%rcx)
jne    128b <ckround+0x14b>
movb   $0x0,(%r12,%rbp,1)
mov    0x1(%r12,%rbp,1),%al
add    $0xcb,%al
cmp    $0x4,%al
jbe    1282 <ckround+0x142>
jmp    128b <ckround+0x14b>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movzbl (%rcx),%eax
cmp    $0x2e,%al
je     1282 <ckround+0x142>
add    $0x1,%al
mov    %al,(%rcx)
cmp    $0x3a,%al
jl     128b <ckround+0x14b>
movb   $0x30,(%rcx)
add    $0xffffffffffffffff,%rcx
cmp    %r12,%rcx
jae    1270 <ckround+0x130>
lea    0xd78(%rip),%rsi
lea    0x8(%rsp),%rdx
mov    %r12,%rdi
call   1050 <sscanf@plt>
test   %r15,%r15
je     12b3 <ckround+0x173>
mov    %r15,%rdi
mov    %r12,%rsi
mov    0x4(%rsp),%edx
call   1030 <strncpy@plt>
movsd  0x8(%rsp),%xmm0
add    $0xd8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [10 x i8] c"%200.100f\00"
@fp_digits = external global i32
@.str.1 = [4 x i8] c"%lf\00"
define double @ckround(double %0, i32 %1, i8* %2, i32 %3) {
%5 = alloca double
%6 = alloca i32
%7 = alloca i8*
%8 = alloca i32
%9 = alloca i8*
%10 = alloca i8*
%11 = alloca i8*
%12 = alloca i32
%13 = alloca i32
%14 = alloca i32
%15 = alloca i32
%16 = alloca i32
%17 = alloca i32
%18 = alloca i32
%19 = alloca i32
%20 = alloca [200 x i8]
%21 = alloca i8*
%22 = alloca double
store double %0, double* %5
store i32 %1, i32* %6
store i8* %2, i8** %7
store i32 %3, i32* %8
store i32 0, i32* %18
store i32 0, i32* %19
%23 = getelementptr inbounds [200 x i8], [200 x i8]* %20, i64 0, i64 0
%24 = load double, double* %5
%25 = call i32 @sprintf(i8* %23, i8* getelementptr inbounds ([10 x i8], [10 x i8]* @.str, i64 0, i64 0), double %24)
%26 = getelementptr inbounds [200 x i8], [200 x i8]* %20, i64 0, i64 0
store i8* %26, i8** %21
%27 = load i32, i32* %6
store i32 %27, i32* %13
store i8* null, i8** %11
%28 = load i8*, i8** %21
store i8* %28, i8** %9
br label %29
29: ; preds = %41, %4
%30 = load i8*, i8** %9
%31 = load i8, i8* %30
%32 = sext i8 %31 to i32
%33 = icmp eq i32 %32, 32
br i1 %33, label %39, label %34
34: ; preds = %29
%35 = load i8*, i8** %9
%36 = load i8, i8* %35
%37 = sext i8 %36 to i32
%38 = icmp eq i32 %37, 9
br label %39
39: ; preds = %34, %29
%40 = phi i1 [ true, %29 ], [ %38, %34 ]
br i1 %40, label %41, label %44
41: ; preds = %39
%42 = load i8*, i8** %9
%43 = getelementptr inbounds i8, i8* %42, i32 1
store i8* %43, i8** %9
br label %29
44: ; preds = %39
%45 = load i8*, i8** %9
%46 = load i8, i8* %45
%47 = sext i8 %46 to i32
%48 = icmp eq i32 %47, 43
br i1 %48, label %49, label %52
49: ; preds = %44
%50 = load i8*, i8** %9
%51 = getelementptr inbounds i8, i8* %50, i32 1
store i8* %51, i8** %9
br label %52
52: ; preds = %49, %44
%53 = load i8*, i8** %9
store i8* %53, i8** %21
%54 = load i8*, i8** %9
%55 = load i8, i8* %54
%56 = sext i8 %55 to i32
%57 = icmp eq i32 %56, 45
br i1 %57, label %58, label %65
58: ; preds = %52
%59 = load i32, i32* %19
%60 = add nsw i32 %59, 1
store i32 %60, i32* %19
%61 = load i8*, i8** %21
%62 = getelementptr inbounds i8, i8* %61, i32 1
store i8* %62, i8** %21
%63 = load i8*, i8** %9
%64 = getelementptr inbounds i8, i8* %63, i32 1
store i8* %64, i8** %9
br label %65
65: ; preds = %58, %52
%66 = load i8*, i8** %21
store i8* %66, i8** %9
store i32 0, i32* %16
br label %67
67: ; preds = %79, %65
%68 = load i8*, i8** %9
%69 = load i8, i8* %68
%70 = sext i8 %69 to i32
%71 = icmp ne i32 %70, 0
br i1 %71, label %72, label %77
72: ; preds = %67
%73 = load i8*, i8** %9
%74 = load i8, i8* %73
%75 = sext i8 %74 to i32
%76 = icmp ne i32 %75, 46
br label %77
77: ; preds = %72, %67
%78 = phi i1 [ false, %67 ], [ %76, %72 ]
br i1 %78, label %79, label %84
79: ; preds = %77
%80 = load i8*, i8** %9
%81 = getelementptr inbounds i8, i8* %80, i32 1
store i8* %81, i8** %9
%82 = load i32, i32* %16
%83 = add nsw i32 %82, 1
store i32 %83, i32* %16
br label %67
84: ; preds = %77
%85 = load i32, i32* %13
%86 = load i32, i32* %16
%87 = add nsw i32 %85, %86
%88 = load i32, i32* @fp_digits
%89 = icmp sgt i32 %87, %88
br i1 %89, label %90, label %94
90: ; preds = %84
%91 = load i32, i32* @fp_digits
%92 = load i32, i32* %16
%93 = sub nsw i32 %91, %92
store i32 %93, i32* %13
br label %94
94: ; preds = %90, %84
%95 = load i32, i32* %13
%96 = icmp slt i32 %95, 0
br i1 %96, label %97, label %98
97: ; preds = %94
store i32 0, i32* %13
br label %98
98: ; preds = %97, %94
%99 = load i32, i32* %16
%100 = load i32, i32* @fp_digits
%101 = icmp sgt i32 %99, %100
br i1 %101, label %102, label %104
102: ; preds = %98
%103 = load i8*, i8** %9
store i8 0, i8* %103
br label %110
104: ; preds = %98
%105 = load i8*, i8** %21
%106 = load i32, i32* @fp_digits
%107 = add nsw i32 %106, 1
%108 = sext i32 %107 to i64
%109 = getelementptr inbounds i8, i8* %105, i64 %108
store i8 0, i8* %109
br label %110
110: ; preds = %104, %102
%111 = load i8*, i8** %21
%112 = call i64 @strlen(i8* %111)
%113 = trunc i64 %112 to i32
store i32 %113, i32* %14
%114 = load i8*, i8** %9
store i8* %114, i8** %11
%115 = load i32, i32* %13
%116 = icmp sgt i32 %115, 0
br i1 %116, label %117, label %151
117: ; preds = %110
%118 = load i32, i32* %16
%119 = load i32, i32* %13
%120 = add nsw i32 %118, %119
%121 = load i32, i32* %14
%122 = icmp slt i32 %120, %121
br i1 %122, label %123, label %150
123: ; preds = %117
%124 = load i8*, i8** %9
%125 = load i8, i8* %124
%126 = sext i8 %125 to i32
%127 = icmp eq i32 %126, 46
br i1 %127, label %128, label %131
128: ; preds = %123
%129 = load i8*, i8** %9
%130 = getelementptr inbounds i8, i8* %129, i32 1
store i8* %130, i8** %9
br label %131
131: ; preds = %128, %123
%132 = load i32, i32* %13
%133 = load i8*, i8** %9
%134 = sext i32 %132 to i64
%135 = getelementptr inbounds i8, i8* %133, i64 %134
store i8* %135, i8** %9
%136 = load i8*, i8** %9
%137 = load i8, i8* %136
%138 = sext i8 %137 to i32
%139 = icmp sgt i32 %138, 52
br i1 %139, label %140, label %146
140: ; preds = %131
%141 = load i8*, i8** %9
%142 = load i8, i8* %141
%143 = sext i8 %142 to i32
%144 = icmp sle i32 %143, 57
br i1 %144, label %145, label %146
145: ; preds = %140
store i32 1, i32* %18
br label %146
146: ; preds = %145, %140, %131
%147 = load i8*, i8** %9
store i8 0, i8* %147
%148 = load i8*, i8** %9
%149 = getelementptr inbounds i8, i8* %148, i32 -1
store i8* %149, i8** %9
br label %150
150: ; preds = %146, %117
br label %215
151: ; preds = %110
%152 = load i32, i32* %13
%153 = icmp eq i32 %152, 0
br i1 %153, label %154, label %183
154: ; preds = %151
%155 = load i8*, i8** %9
%156 = load i8, i8* %155
%157 = sext i8 %156 to i32
%158 = icmp eq i32 %157, 46
br i1 %158, label %159, label %182
159: ; preds = %154
%160 = load i8*, i8** %9
store i8 0, i8* %160
%161 = load i8*, i8** %9
%162 = getelementptr inbounds i8, i8* %161, i64 1
%163 = load i8, i8* %162
%164 = icmp ne i8 %163, 0
br i1 %164, label %165, label %179
165: ; preds = %159
%166 = load i8*, i8** %9
%167 = getelementptr inbounds i8, i8* %166, i64 1
%168 = load i8, i8* %167
%169 = sext i8 %168 to i32
%170 = icmp sgt i32 %169, 52
br i1 %170, label %171, label %178
171: ; preds = %165
%172 = load i8*, i8** %9
%173 = getelementptr inbounds i8, i8* %172, i64 1
%174 = load i8, i8* %173
%175 = sext i8 %174 to i32
%176 = icmp sle i32 %175, 57
br i1 %176, label %177, label %178
177: ; preds = %171
store i32 1, i32* %18
br label %178
178: ; preds = %177, %171, %165
br label %179
179: ; preds = %178, %159
%180 = load i8*, i8** %9
%181 = getelementptr inbounds i8, i8* %180, i32 -1
store i8* %181, i8** %9
br label %182
182: ; preds = %179, %154
br label %214
183: ; preds = %151
%184 = load i8*, i8** %9
%185 = load i32, i32* %13
%186 = sext i32 %185 to i64
%187 = getelementptr inbounds i8, i8* %184, i64 %186
%188 = load i8*, i8** %21
%189 = icmp ugt i8* %187, %188
br i1 %189, label %190, label %213
190: ; preds = %183
%191 = load i32, i32* %13
%192 = load i8*, i8** %9
%193 = sext i32 %191 to i64
%194 = getelementptr inbounds i8, i8* %192, i64 %193
store i8* %194, i8** %9
%195 = load i8*, i8** %11
store i8 0, i8* %195
store i32 0, i32* %18
%196 = load i8*, i8** %9
%197 = load i8, i8* %196
%198 = sext i8 %197 to i32
%199 = icmp sgt i32 %198, 52
br i1 %199, label %200, label %201
200: ; preds = %190
store i32 1, i32* %18
br label %201
201: ; preds = %200, %190
%202 = load i8*, i8** %9
store i8* %202, i8** %10
br label %203
203: ; preds = %207, %201
%204 = load i8*, i8** %10
%205 = load i8*, i8** %11
%206 = icmp ult i8* %204, %205
br i1 %206, label %207, label %210
207: ; preds = %203
%208 = load i8*, i8** %10
%209 = getelementptr inbounds i8, i8* %208, i32 1
store i8* %209, i8** %10
store i8 48, i8* %208
br label %203
210: ; preds = %203
%211 = load i8*, i8** %9
%212 = getelementptr inbounds i8, i8* %211, i32 -1
store i8* %212, i8** %9
br label %213
213: ; preds = %210, %183
br label %214
214: ; preds = %213, %182
br label %215
215: ; preds = %214, %150
%216 = load i32, i32* %18
%217 = icmp ne i32 %216, 0
br i1 %217, label %218, label %247
218: ; preds = %215
br label %219
219: ; preds = %242, %228, %218
%220 = load i8*, i8** %9
%221 = load i8*, i8** %21
%222 = icmp uge i8* %220, %221
br i1 %222, label %223, label %246
223: ; preds = %219
%224 = load i8*, i8** %9
%225 = load i8, i8* %224
%226 = sext i8 %225 to i32
%227 = icmp eq i32 %226, 46
br i1 %227, label %228, label %231
228: ; preds = %223
%229 = load i8*, i8** %9
%230 = getelementptr inbounds i8, i8* %229, i32 -1
store i8* %230, i8** %9
br label %219
231: ; preds = %223
%232 = load i8*, i8** %9
%233 = load i8, i8* %232
%234 = sext i8 %233 to i32
%235 = add nsw i32 %234, 1
%236 = trunc i32 %235 to i8
store i8 %236, i8* %232
store i32 0, i32* %18
%237 = load i8*, i8** %9
%238 = load i8, i8* %237
%239 = sext i8 %238 to i32
%240 = icmp sle i32 %239, 57
br i1 %240, label %241, label %242
241: ; preds = %231
br label %246
242: ; preds = %231
%243 = load i8*, i8** %9
store i8 48, i8* %243
store i32 1, i32* %18
%244 = load i8*, i8** %9
%245 = getelementptr inbounds i8, i8* %244, i32 -1
store i8* %245, i8** %9
br label %219
246: ; preds = %241, %219
br label %247
247: ; preds = %246, %215
%248 = load i8*, i8** %21
%249 = call i32 @sscanf(i8* %248, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.1, i64 0, i64 0), double* %22)
%250 = load i8*, i8** %7
%251 = icmp ne i8* %250, null
br i1 %251, label %252, label %257
252: ; preds = %247
%253 = load i8*, i8** %7
%254 = load i8*, i8** %21
%255 = load i32, i32* %8
%256 = call i32 @strncpy(i8* %253, i8* %254, i32 %255)
br label %257
257: ; preds = %252, %247
%258 = load double, double* %22
ret double %258
}

LLVM IR (-O2):
@.str = [10 x i8] c"%200.100f\00"
@fp_digits = external global i32
@.str.1 = [4 x i8] c"%lf\00"
define double @ckround(double %0, i32 %1, i8* %2, i32 %3) {
%5 = alloca [200 x i8]
%6 = alloca double
%7 = getelementptr inbounds [200 x i8], [200 x i8]* %5, i64 0, i64 0
%8 = bitcast double* %6 to i8*
%9 = call i32 @sprintf(i8* %7, i8* dereferenceable(1) getelementptr inbounds ([10 x i8], [10 x i8]* @.str, i64 0, i64 0), double %0)
br label %10
10: ; preds = %13, %4
%11 = phi i8* [ %7, %4 ], [ %14, %13 ]
%12 = load i8, i8* %11
switch i8 %12, label %18 [
i8 32, label %13
i8 9, label %13
i8 43, label %15
]
13: ; preds = %10, %10
%14 = getelementptr inbounds i8, i8* %11, i64 1
br label %10
15: ; preds = %10
%16 = getelementptr inbounds i8, i8* %11, i64 1
%17 = load i8, i8* %16
br label %18
18: ; preds = %10, %15
%19 = phi i8 [ %17, %15 ], [ %12, %10 ]
%20 = phi i8* [ %16, %15 ], [ %11, %10 ]
%21 = icmp eq i8 %19, 45
%22 = zext i1 %21 to i64
%23 = getelementptr i8, i8* %20, i64 %22
br label %24
24: ; preds = %28, %18
%25 = phi i32 [ 0, %18 ], [ %30, %28 ]
%26 = phi i8* [ %23, %18 ], [ %29, %28 ]
%27 = load i8, i8* %26
switch i8 %27, label %28 [
i8 0, label %31
i8 46, label %31
]
28: ; preds = %24
%29 = getelementptr inbounds i8, i8* %26, i64 1
%30 = add nuw nsw i32 %25, 1
br label %24
31: ; preds = %24, %24
%32 = add nsw i32 %25, %1
%33 = load i32, i32* @fp_digits
%34 = icmp sgt i32 %32, %33
%35 = sub nsw i32 %33, %25
%36 = select i1 %34, i32 %35, i32 %1
%37 = icmp sgt i32 %36, 0
%38 = select i1 %37, i32 %36, i32 0
%39 = icmp slt i32 %33, %25
%40 = add nsw i32 %33, 1
%41 = sext i32 %40 to i64
%42 = getelementptr inbounds i8, i8* %23, i64 %41
%43 = select i1 %39, i8* %26, i8* %42
store i8 0, i8* %43
br i1 %37, label %44, label %59
44: ; preds = %31
%45 = call i64 @strlen(i8* %23)
%46 = trunc i64 %45 to i32
%47 = add nuw nsw i32 %38, %25
%48 = icmp slt i32 %47, %46
br i1 %48, label %49, label %82
49: ; preds = %44
%50 = load i8, i8* %26
%51 = icmp eq i8 %50, 46
%52 = zext i1 %51 to i64
%53 = getelementptr i8, i8* %26, i64 %52
%54 = zext i32 %38 to i64
%55 = getelementptr inbounds i8, i8* %53, i64 %54
%56 = load i8, i8* %55
%57 = add i8 %56, -53
%58 = icmp ult i8 %57, 5
store i8 0, i8* %55
br i1 %58, label %67, label %82
59: ; preds = %31
%60 = load i8, i8* %26
%61 = icmp eq i8 %60, 46
br i1 %61, label %62, label %82
62: ; preds = %59
store i8 0, i8* %26
%63 = getelementptr inbounds i8, i8* %26, i64 1
%64 = load i8, i8* %63
%65 = add i8 %64, -53
%66 = icmp ult i8 %65, 5
br i1 %66, label %67, label %82
67: ; preds = %62, %49
%68 = phi i8* [ %55, %49 ], [ %26, %62 ]
%69 = getelementptr inbounds i8, i8* %68, i64 -1
%70 = icmp ult i8* %69, %23
br i1 %70, label %82, label %71
71: ; preds = %67, %75
%72 = phi i8* [ %76, %75 ], [ %69, %67 ]
%73 = load i8, i8* %72
%74 = icmp eq i8 %73, 46
br i1 %74, label %75, label %78
75: ; preds = %71, %81
%76 = getelementptr inbounds i8, i8* %72, i64 -1
%77 = icmp ult i8* %76, %23
br i1 %77, label %82, label %71
78: ; preds = %71
%79 = add i8 %73, 1
store i8 %79, i8* %72
%80 = icmp slt i8 %79, 58
br i1 %80, label %82, label %81
81: ; preds = %78
store i8 48, i8* %72
br label %75
82: ; preds = %78, %75, %67, %59, %62, %44, %49
%83 = call i32 @sscanf(i8* %23, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.1, i64 0, i64 0), double* %6)
%84 = icmp eq i8* %2, null
br i1 %84, label %87, label %85
85: ; preds = %82
%86 = call i32 @strncpy(i8* %2, i8* %23, i32 %3)
br label %87
87: ; preds = %85, %82
%88 = load double, double* %6
ret double %88
}