#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 */
typedef int uint8_t;

/* Variables and functions */
double compr_factor(uint8_t *text, int len, uint8_t *codelen) {
  int i;
  int bits = 0;
  for (i = 0; i < len; i++) {
    if (text[i] % 2 == 0) {
      bits += codelen[text[i] / 2] & 0x0F;
    } else {
      bits += codelen[text[i] / 2] >> 4;
    }
  }
  return bits / (double)len / 8;
}


x86 assembly (clang, -O0):
<compr_factor>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    11bd <compr_factor+0xbd>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
cmp    $0x0,%edx
jne    117a <compr_factor+0x7a>
mov    -0x18(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x28(%rbp),%rax
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%eax
and    $0xf,%eax
add    -0x20(%rbp),%eax
mov    %eax,-0x20(%rbp)
jmp    11aa <compr_factor+0xaa>
mov    -0x18(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x30(%rbp),%rax
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%eax
sar    $0x4,%eax
add    -0x20(%rbp),%eax
mov    %eax,-0x20(%rbp)
jmp    11af <compr_factor+0xaf>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    111d <compr_factor+0x1d>
cvtsi2sdl -0x20(%rbp),%xmm0
cvtsi2sdl -0xc(%rbp),%xmm1
divsd  %xmm1,%xmm0
movsd  0xe2d(%rip),%xmm1
divsd  %xmm1,%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<compr_factor>:
test   %esi,%esi
jle    1149 <compr_factor+0x49>
mov    %esi,%r8d
xor    %ecx,%ecx
xor    %r10d,%r10d
nopl   0x0(%rax)
mov    (%rdi,%rcx,4),%r9d
mov    %r9d,%eax
shr    $0x1f,%eax
add    %r9d,%eax
sar    %eax
cltq
mov    (%rdx,%rax,4),%eax
mov    %eax,%r11d
and    $0xf,%r11d
sar    $0x4,%eax
test   $0x1,%r9b
cmove  %r11d,%eax
add    %eax,%r10d
add    $0x1,%rcx
cmp    %rcx,%r8
jne    1110 <compr_factor+0x10>
cvtsi2sd %r10d,%xmm0
jmp    114d <compr_factor+0x4d>
xorpd  %xmm0,%xmm0
cvtsi2sd %esi,%xmm1
divsd  %xmm1,%xmm0
mulsd  0xea3(%rip),%xmm0
ret

LLVM IR (-O0):
define double @compr_factor(i32* %0, i32 %1, i32* %2) {
%4 = alloca i32*
%5 = alloca i32
%6 = alloca i32*
%7 = alloca i32
%8 = alloca i32
store i32* %0, i32** %4
store i32 %1, i32* %5
store i32* %2, i32** %6
store i32 0, i32* %8
store i32 0, i32* %7
br label %9
9: ; preds = %50, %3
%10 = load i32, i32* %7
%11 = load i32, i32* %5
%12 = icmp slt i32 %10, %11
br i1 %12, label %13, label %53
13: ; preds = %9
%14 = load i32*, i32** %4
%15 = load i32, i32* %7
%16 = sext i32 %15 to i64
%17 = getelementptr inbounds i32, i32* %14, i64 %16
%18 = load i32, i32* %17
%19 = srem i32 %18, 2
%20 = icmp eq i32 %19, 0
br i1 %20, label %21, label %35
21: ; preds = %13
%22 = load i32*, i32** %6
%23 = load i32*, i32** %4
%24 = load i32, i32* %7
%25 = sext i32 %24 to i64
%26 = getelementptr inbounds i32, i32* %23, i64 %25
%27 = load i32, i32* %26
%28 = sdiv i32 %27, 2
%29 = sext i32 %28 to i64
%30 = getelementptr inbounds i32, i32* %22, i64 %29
%31 = load i32, i32* %30
%32 = and i32 %31, 15
%33 = load i32, i32* %8
%34 = add nsw i32 %33, %32
store i32 %34, i32* %8
br label %49
35: ; preds = %13
%36 = load i32*, i32** %6
%37 = load i32*, i32** %4
%38 = load i32, i32* %7
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds i32, i32* %37, i64 %39
%41 = load i32, i32* %40
%42 = sdiv i32 %41, 2
%43 = sext i32 %42 to i64
%44 = getelementptr inbounds i32, i32* %36, i64 %43
%45 = load i32, i32* %44
%46 = ashr i32 %45, 4
%47 = load i32, i32* %8
%48 = add nsw i32 %47, %46
store i32 %48, i32* %8
br label %49
49: ; preds = %35, %21
br label %50
50: ; preds = %49
%51 = load i32, i32* %7
%52 = add nsw i32 %51, 1
store i32 %52, i32* %7
br label %9
53: ; preds = %9
%54 = load i32, i32* %8
%55 = sitofp i32 %54 to double
%56 = load i32, i32* %5
%57 = sitofp i32 %56 to double
%58 = fdiv double %55, %57
%59 = fdiv double %58, 8.000000e+00
ret double %59
}

LLVM IR (-O2):
define double @compr_factor(i32* nocapture %0, i32 %1, i32* nocapture %2) {
%4 = icmp sgt i32 %1, 0
br i1 %4, label %5, label %26
5: ; preds = %3
%6 = zext i32 %1 to i64
br label %7
7: ; preds = %5, %7
%8 = phi i64 [ 0, %5 ], [ %22, %7 ]
%9 = phi i32 [ 0, %5 ], [ %21, %7 ]
%10 = getelementptr inbounds i32, i32* %0, i64 %8
%11 = load i32, i32* %10
%12 = and i32 %11, 1
%13 = icmp eq i32 %12, 0
%14 = sdiv i32 %11, 2
%15 = sext i32 %14 to i64
%16 = getelementptr inbounds i32, i32* %2, i64 %15
%17 = load i32, i32* %16
%18 = and i32 %17, 15
%19 = ashr i32 %17, 4
%20 = select i1 %13, i32 %18, i32 %19
%21 = add nsw i32 %20, %9
%22 = add nuw nsw i64 %8, 1
%23 = icmp eq i64 %22, %6
br i1 %23, label %24, label %7
24: ; preds = %7
%25 = sitofp i32 %21 to double
br label %26
26: ; preds = %24, %3
%27 = phi double [ 0.000000e+00, %3 ], [ %25, %24 ]
%28 = sitofp i32 %1 to double
%29 = fdiv double %27, %28
%30 = fmul double %29, 1.250000e-01
ret double %30
}