#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 ABS(int);
int /*<<< orphan*/ DEBUG_LOG(char *, int);
int MAX(int, int /*<<< orphan*/);
void round_mantissa(unsigned long *mantissa, int *exponent, int prec, int is_f,
                    int compressed) {
  unsigned long addend = (100000000UL) * 5;
  int shift = 0;
  int e = *exponent;
  if (compressed) {
    e %= 3;
    if (e < 0)
      e += 3;
    if (is_f) {
      int absexp = ABS(*exponent);
      if (absexp > (24))
        e += (absexp - (24));
    }
    DEBUG_LOG("round_mantissa(): compressed exponent = %d\n", e);
  }
  if (!is_f) {
    if (e < 0)
      e++;
    e = ABS(e);
  }
  shift = e + prec + 1;
  shift = MAX(shift, 0);
  DEBUG_LOG("round_mantissa(): shift = %d\n", shift);
  while (shift--)
    addend /= 10;
  *mantissa += addend;
  if (*mantissa >= ((100000000UL) * 10)) {
    *mantissa = (*mantissa + 5) / 10;
    *exponent += 1;
    DEBUG_LOG("round_mantissa(): integer overflow (new exponent: %d)\n",
              *exponent);
  }
}


x86 assembly (clang, -O0):
<round_mantissa>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
mov    %r8d,-0x1c(%rbp)
movq   $0x1dcd6500,-0x28(%rbp)
1d
movl   $0x0,-0x2c(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x30(%rbp)
cmpl   $0x0,-0x1c(%rbp)
je     11cf <round_mantissa+0x9f>
mov    -0x30(%rbp),%eax
mov    $0x3,%ecx
cltd
idiv   %ecx
mov    %edx,-0x30(%rbp)
cmpl   $0x0,-0x30(%rbp)
jge    118d <round_mantissa+0x5d>
mov    -0x30(%rbp),%eax
add    $0x3,%eax
mov    %eax,-0x30(%rbp)
cmpl   $0x0,-0x18(%rbp)
je     11c0 <round_mantissa+0x90>
mov    -0x10(%rbp),%rax
mov    (%rax),%edi
call   1040 <ABS@plt>
mov    %eax,-0x34(%rbp)
cmpl   $0x18,-0x34(%rbp)
jle    11bb <round_mantissa+0x8b>
mov    -0x34(%rbp),%eax
sub    $0x18,%eax
add    -0x30(%rbp),%eax
mov    %eax,-0x30(%rbp)
jmp    11c0 <round_mantissa+0x90>
mov    -0x30(%rbp),%esi
lea    0xe36(%rip),%rdi
call   1050 <DEBUG_LOG@plt>
cmpl   $0x0,-0x18(%rbp)
jne    11f7 <round_mantissa+0xc7>
cmpl   $0x0,-0x30(%rbp)
jge    11ec <round_mantissa+0xbc>
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
mov    -0x30(%rbp),%edi
call   1040 <ABS@plt>
mov    %eax,-0x30(%rbp)
mov    -0x30(%rbp),%eax
add    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
mov    -0x2c(%rbp),%edi
xor    %esi,%esi
call   1030 <MAX@plt>
mov    %eax,-0x2c(%rbp)
mov    -0x2c(%rbp),%esi
lea    0xe12(%rip),%rdi
call   1050 <DEBUG_LOG@plt>
mov    -0x2c(%rbp),%eax
mov    %eax,%ecx
add    $0xffffffff,%ecx
mov    %ecx,-0x2c(%rbp)
cmp    $0x0,%eax
je     124a <round_mantissa+0x11a>
mov    -0x28(%rbp),%rax
mov    $0xa,%ecx
xor    %edx,%edx
div    %rcx
mov    %rax,-0x28(%rbp)
jmp    121f <round_mantissa+0xef>
mov    -0x28(%rbp),%rcx
mov    -0x8(%rbp),%rax
add    (%rax),%rcx
mov    %rcx,(%rax)
mov    -0x8(%rbp),%rax
cmpq   $0x3b9aca00,(%rax)
jb     12a5 <round_mantissa+0x175>
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
add    $0x5,%rax
mov    $0xa,%ecx
xor    %edx,%edx
div    %rcx
mov    %rax,%rcx
mov    -0x8(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x10(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
mov    -0x10(%rbp),%rax
mov    (%rax),%esi
lea    0xdaa(%rip),%rdi
call   1050 <DEBUG_LOG@plt>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<round_mantissa>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
mov    %ecx,%ebp
mov    %edx,%r12d
mov    %rsi,%r14
mov    %rdi,%r15
mov    (%rsi),%edi
test   %r8d,%r8d
je     1199 <round_mantissa+0x69>
movslq %edi,%rax
imul   $0x55555556,%rax,%rcx
mov    %rcx,%rdx
shr    $0x3f,%rdx
shr    $0x20,%rcx
add    %edx,%ecx
lea    (%rcx,%rcx,2),%ecx
mov    %eax,%edx
sub    %ecx,%edx
neg    %ecx
test   %edx,%edx
lea    0x3(%rax,%rcx,1),%ebx
cmovns %edx,%ebx
test   %ebp,%ebp
je     1189 <round_mantissa+0x59>
call   1040 <ABS@plt>
lea    -0x18(%rax),%ecx
xor    %edx,%edx
cmp    $0x19,%eax
cmovge %ecx,%edx
add    %edx,%ebx
lea    0xe70(%rip),%rdi
mov    %ebx,%esi
call   1050 <DEBUG_LOG@plt>
mov    %ebx,%edi
test   %ebp,%ebp
jne    11ad <round_mantissa+0x7d>
mov    %edi,%eax
shr    $0x1f,%eax
add    %edi,%eax
mov    %eax,%edi
call   1040 <ABS@plt>
mov    %eax,%edi
add    %r12d,%edi
add    $0x1,%edi
xor    %esi,%esi
call   1030 <MAX@plt>
mov    %eax,%ebx
lea    0xe69(%rip),%rdi
mov    %eax,%esi
call   1050 <DEBUG_LOG@plt>
test   %ebx,%ebx
je     11e2 <round_mantissa+0xb2>
lea    -0x1(%rbx),%eax
mov    %ebx,%ecx
and    $0x3,%ecx
cmp    $0x3,%eax
jae    11e9 <round_mantissa+0xb9>
mov    $0x1dcd6500,%edx
jmp    120f <round_mantissa+0xdf>
mov    $0x1dcd6500,%edx
jmp    122f <round_mantissa+0xff>
and    $0xfffffffc,%ebx
mov    $0x1dcd6500,%edx
movabs $0x346dc5d63886594b,%rsi
c5 6d 34
nopl   0x0(%rax,%rax,1)
mov    %rdx,%rax
mul    %rsi
shr    $0xb,%rdx
add    $0xfffffffc,%ebx
jne    1200 <round_mantissa+0xd0>
test   %ecx,%ecx
je     122f <round_mantissa+0xff>
movabs $0xcccccccccccccccd,%rsi
cc cc cc
nopl   (%rax)
mov    %rdx,%rax
mul    %rsi
shr    $0x3,%rdx
add    $0xffffffff,%ecx
jne    1220 <round_mantissa+0xf0>
add    (%r15),%rdx
mov    %rdx,(%r15)
cmp    $0x3b9aca00,%rdx
jb     1276 <round_mantissa+0x146>
add    $0x5,%rdx
movabs $0xcccccccccccccccd,%rcx
cc cc cc
mov    %rdx,%rax
mul    %rcx
shr    $0x3,%rdx
mov    %rdx,(%r15)
mov    (%r14),%esi
add    $0x1,%esi
mov    %esi,(%r14)
lea    0xde1(%rip),%rdi
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
jmp    1050 <DEBUG_LOG@plt>
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [44 x i8] c"round_mantissa(): compressed exponent = %d\0A\00"
@.str.1 = [30 x i8] c"round_mantissa(): shift = %d\0A\00"
@.str.2 = [55 x i8] c"round_mantissa(): integer overflow (new exponent: %d)\0A\00"
define void @round_mantissa(i64* %0, i32* %1, i32 %2, i32 %3, i32 %4) {
%6 = alloca i64*
%7 = alloca i32*
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i64
%12 = alloca i32
%13 = alloca i32
%14 = alloca i32
store i64* %0, i64** %6
store i32* %1, i32** %7
store i32 %2, i32* %8
store i32 %3, i32* %9
store i32 %4, i32* %10
store i64 500000000, i64* %11
store i32 0, i32* %12
%15 = load i32*, i32** %7
%16 = load i32, i32* %15
store i32 %16, i32* %13
%17 = load i32, i32* %10
%18 = icmp ne i32 %17, 0
br i1 %18, label %19, label %45
19: ; preds = %5
%20 = load i32, i32* %13
%21 = srem i32 %20, 3
store i32 %21, i32* %13
%22 = load i32, i32* %13
%23 = icmp slt i32 %22, 0
br i1 %23, label %24, label %27
24: ; preds = %19
%25 = load i32, i32* %13
%26 = add nsw i32 %25, 3
store i32 %26, i32* %13
br label %27
27: ; preds = %24, %19
%28 = load i32, i32* %9
%29 = icmp ne i32 %28, 0
br i1 %29, label %30, label %42
30: ; preds = %27
%31 = load i32*, i32** %7
%32 = load i32, i32* %31
%33 = call i32 @ABS(i32 %32)
store i32 %33, i32* %14
%34 = load i32, i32* %14
%35 = icmp sgt i32 %34, 24
br i1 %35, label %36, label %41
36: ; preds = %30
%37 = load i32, i32* %14
%38 = sub nsw i32 %37, 24
%39 = load i32, i32* %13
%40 = add nsw i32 %39, %38
store i32 %40, i32* %13
br label %41
41: ; preds = %36, %30
br label %42
42: ; preds = %41, %27
%43 = load i32, i32* %13
%44 = call i32 @DEBUG_LOG(i8* getelementptr inbounds ([44 x i8], [44 x i8]* @.str, i64 0, i64 0), i32 %43)
br label %45
45: ; preds = %42, %5
%46 = load i32, i32* %9
%47 = icmp ne i32 %46, 0
br i1 %47, label %57, label %48
48: ; preds = %45
%49 = load i32, i32* %13
%50 = icmp slt i32 %49, 0
br i1 %50, label %51, label %54
51: ; preds = %48
%52 = load i32, i32* %13
%53 = add nsw i32 %52, 1
store i32 %53, i32* %13
br label %54
54: ; preds = %51, %48
%55 = load i32, i32* %13
%56 = call i32 @ABS(i32 %55)
store i32 %56, i32* %13
br label %57
57: ; preds = %54, %45
%58 = load i32, i32* %13
%59 = load i32, i32* %8
%60 = add nsw i32 %58, %59
%61 = add nsw i32 %60, 1
store i32 %61, i32* %12
%62 = load i32, i32* %12
%63 = call i32 @MAX(i32 %62, i32 0)
store i32 %63, i32* %12
%64 = load i32, i32* %12
%65 = call i32 @DEBUG_LOG(i8* getelementptr inbounds ([30 x i8], [30 x i8]* @.str.1, i64 0, i64 0), i32 %64)
br label %66
66: ; preds = %70, %57
%67 = load i32, i32* %12
%68 = add nsw i32 %67, -1
store i32 %68, i32* %12
%69 = icmp ne i32 %67, 0
br i1 %69, label %70, label %73
70: ; preds = %66
%71 = load i64, i64* %11
%72 = udiv i64 %71, 10
store i64 %72, i64* %11
br label %66
73: ; preds = %66
%74 = load i64, i64* %11
%75 = load i64*, i64** %6
%76 = load i64, i64* %75
%77 = add i64 %76, %74
store i64 %77, i64* %75
%78 = load i64*, i64** %6
%79 = load i64, i64* %78
%80 = icmp uge i64 %79, 1000000000
br i1 %80, label %81, label %93
81: ; preds = %73
%82 = load i64*, i64** %6
%83 = load i64, i64* %82
%84 = add i64 %83, 5
%85 = udiv i64 %84, 10
%86 = load i64*, i64** %6
store i64 %85, i64* %86
%87 = load i32*, i32** %7
%88 = load i32, i32* %87
%89 = add nsw i32 %88, 1
store i32 %89, i32* %87
%90 = load i32*, i32** %7
%91 = load i32, i32* %90
%92 = call i32 @DEBUG_LOG(i8* getelementptr inbounds ([55 x i8], [55 x i8]* @.str.2, i64 0, i64 0), i32 %91)
br label %93
93: ; preds = %81, %73
ret void
}

LLVM IR (-O2):
@.str = [44 x i8] c"round_mantissa(): compressed exponent = %d\0A\00"
@.str.1 = [30 x i8] c"round_mantissa(): shift = %d\0A\00"
@.str.2 = [55 x i8] c"round_mantissa(): integer overflow (new exponent: %d)\0A\00"
define void @round_mantissa(i64* nocapture %0, i32* nocapture %1, i32 %2, i32 %3, i32 %4) {
%6 = load i32, i32* %1
%7 = icmp eq i32 %4, 0
br i1 %7, label %23, label %8
8: ; preds = %5
%9 = srem i32 %6, 3
%10 = icmp slt i32 %9, 0
%11 = add nsw i32 %9, 3
%12 = select i1 %10, i32 %11, i32 %9
%13 = icmp eq i32 %3, 0
br i1 %13, label %20, label %14
14: ; preds = %8
%15 = tail call i32 @ABS(i32 %6)
%16 = icmp sgt i32 %15, 24
%17 = add nsw i32 %15, -24
%18 = select i1 %16, i32 %17, i32 0
%19 = add nuw nsw i32 %18, %12
br label %20
20: ; preds = %14, %8
%21 = phi i32 [ %19, %14 ], [ %12, %8 ]
%22 = tail call i32 @DEBUG_LOG(i8* getelementptr inbounds ([44 x i8], [44 x i8]* @.str, i64 0, i64 0), i32 %21)
br label %23
23: ; preds = %20, %5
%24 = phi i32 [ %21, %20 ], [ %6, %5 ]
%25 = icmp eq i32 %3, 0
br i1 %25, label %26, label %30
26: ; preds = %23
%27 = lshr i32 %24, 31
%28 = add nsw i32 %27, %24
%29 = tail call i32 @ABS(i32 %28)
br label %30
30: ; preds = %26, %23
%31 = phi i32 [ %24, %23 ], [ %29, %26 ]
%32 = add i32 %2, 1
%33 = add i32 %32, %31
%34 = tail call i32 @MAX(i32 %33, i32 0)
%35 = tail call i32 @DEBUG_LOG(i8* getelementptr inbounds ([30 x i8], [30 x i8]* @.str.1, i64 0, i64 0), i32 %34)
%36 = icmp eq i32 %34, 0
br i1 %36, label %59, label %37
37: ; preds = %30
%38 = add i32 %34, -1
%39 = and i32 %34, 3
%40 = icmp ult i32 %38, 3
br i1 %40, label %49, label %41
41: ; preds = %37
%42 = and i32 %34, -4
br label %43
43: ; preds = %43, %41
%44 = phi i64 [ 500000000, %41 ], [ %46, %43 ]
%45 = phi i32 [ 0, %41 ], [ %47, %43 ]
%46 = udiv i64 %44, 10000
%47 = add i32 %45, 4
%48 = icmp eq i32 %47, %42
br i1 %48, label %49, label %43
49: ; preds = %43, %37
%50 = phi i64 [ undef, %37 ], [ %46, %43 ]
%51 = phi i64 [ 500000000, %37 ], [ %46, %43 ]
%52 = icmp eq i32 %39, 0
br i1 %52, label %59, label %53
53: ; preds = %49, %53
%54 = phi i64 [ %56, %53 ], [ %51, %49 ]
%55 = phi i32 [ %57, %53 ], [ 0, %49 ]
%56 = udiv i64 %54, 10
%57 = add i32 %55, 1
%58 = icmp eq i32 %57, %39
br i1 %58, label %59, label %53
59: ; preds = %49, %53, %30
%60 = phi i64 [ 500000000, %30 ], [ %50, %49 ], [ %56, %53 ]
%61 = load i64, i64* %0
%62 = add i64 %61, %60
store i64 %62, i64* %0
%63 = icmp ugt i64 %62, 999999999
br i1 %63, label %64, label %70
64: ; preds = %59
%65 = add i64 %62, 5
%66 = udiv i64 %65, 10
store i64 %66, i64* %0
%67 = load i32, i32* %1
%68 = add nsw i32 %67, 1
store i32 %68, i32* %1
%69 = tail call i32 @DEBUG_LOG(i8* getelementptr inbounds ([55 x i8], [55 x i8]* @.str.2, i64 0, i64 0), i32 %68)
br label %70
70: ; preds = %64, %59
ret void
}