#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*/ EINVAL;
int /*<<< orphan*/ errno;
double mode(double arr[], size_t arrlen) {
  if (arrlen == 0) {
    errno = EINVAL;
    return 0.0;
  }
  size_t i;
  double most_freq_num = arr[0];
  size_t max_freq = 1;
  double curr_num = arr[0];
  size_t curr_freq = 1;
  for (i = 1; i < arrlen; i++) {
    if (curr_freq > max_freq) {
      most_freq_num = curr_num;
      max_freq = curr_freq;
    }
    if (arr[i] == curr_num) {
      curr_freq++;
    } else {
      curr_num = arr[i];
      curr_freq = 1;
    }
  }
  return most_freq_num;
}


x86 assembly (clang, -O0):
<mode>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
cmpq   $0x0,-0x18(%rbp)
jne    1136 <mode+0x36>
mov    0x2eba(%rip),%rax
mov    (%rax),%ecx
mov    0x2eb9(%rip),%rax
mov    %ecx,(%rax)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    11ff <mode+0xff>
mov    -0x10(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x28(%rbp)
movq   $0x1,-0x30(%rbp)
mov    -0x10(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x38(%rbp)
movq   $0x1,-0x40(%rbp)
movq   $0x1,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmp    -0x18(%rbp),%rax
jae    11f5 <mode+0xf5>
mov    -0x40(%rbp),%rax
cmp    -0x30(%rbp),%rax
jbe    1196 <mode+0x96>
movsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x40(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
ucomisd -0x38(%rbp),%xmm0
jne    11c5 <mode+0xc5>
jp     11c5 <mode+0xc5>
mov    -0x40(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x40(%rbp)
jmp    11df <mode+0xdf>
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x38(%rbp)
movq   $0x1,-0x40(%rbp)
jmp    11e4 <mode+0xe4>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    1168 <mode+0x68>
movsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<mode>:
test   %rsi,%rsi
je     113f <mode+0x3f>
movsd  (%rdi),%xmm0
cmp    $0x1,%rsi
je     113e <mode+0x3e>
lea    -0x1(%rsi),%r8
cmp    $0x2,%rsi
jne    1155 <mode+0x55>
mov    $0x1,%ecx
mov    $0x1,%edx
movapd %xmm0,%xmm1
cmp    %rdx,%rcx
ja     1130 <mode+0x30>
movapd %xmm1,%xmm0
test   $0x1,%r8b
je     113a <mode+0x3a>
movapd %xmm0,%xmm1
movapd %xmm1,%xmm0
ret
mov    0x2e92(%rip),%rax
mov    (%rax),%eax
mov    0x2e91(%rip),%rcx
mov    %eax,(%rcx)
xorps  %xmm0,%xmm0
ret
mov    %r8,%r9
and    $0xfffffffffffffffe,%r9
mov    $0x1,%eax
xor    %esi,%esi
mov    $0x1,%ecx
mov    $0x1,%edx
movapd %xmm0,%xmm1
jmp    1191 <mode+0x91>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
cmovne %rax,%rcx
cmovp  %rax,%rcx
add    $0x2,%rsi
cmp    %rsi,%r9
je     1127 <mode+0x27>
movapd %xmm0,%xmm3
cmp    %rdx,%rcx
ja     119e <mode+0x9e>
movapd %xmm1,%xmm3
cmova  %rcx,%rdx
add    $0x1,%rcx
movsd  0x8(%rdi,%rsi,8),%xmm2
ucomisd %xmm2,%xmm0
jne    11b8 <mode+0xb8>
jp     11b8 <mode+0xb8>
movapd %xmm0,%xmm2
cmovne %rax,%rcx
cmovp  %rax,%rcx
movapd %xmm2,%xmm1
cmp    %rdx,%rcx
ja     11cd <mode+0xcd>
movapd %xmm3,%xmm1
cmova  %rcx,%rdx
movsd  0x10(%rdi,%rsi,8),%xmm0
add    $0x1,%rcx
ucomisd %xmm0,%xmm2
jne    1180 <mode+0x80>
jp     1180 <mode+0x80>
movapd %xmm2,%xmm0
jmp    1180 <mode+0x80>

LLVM IR (-O0):
@EINVAL = global i32 0
@errno = global i32 0
define double @mode(double* %0, i64 %1) {
%3 = alloca double
%4 = alloca double*
%5 = alloca i64
%6 = alloca i64
%7 = alloca double
%8 = alloca i64
%9 = alloca double
%10 = alloca i64
store double* %0, double** %4
store i64 %1, i64* %5
%11 = load i64, i64* %5
%12 = icmp eq i64 %11, 0
br i1 %12, label %13, label %15
13: ; preds = %2
%14 = load i32, i32* @EINVAL
store i32 %14, i32* @errno
store double 0.000000e+00, double* %3
br label %54
15: ; preds = %2
%16 = load double*, double** %4
%17 = getelementptr inbounds double, double* %16, i64 0
%18 = load double, double* %17
store double %18, double* %7
store i64 1, i64* %8
%19 = load double*, double** %4
%20 = getelementptr inbounds double, double* %19, i64 0
%21 = load double, double* %20
store double %21, double* %9
store i64 1, i64* %10
store i64 1, i64* %6
br label %22
22: ; preds = %49, %15
%23 = load i64, i64* %6
%24 = load i64, i64* %5
%25 = icmp ult i64 %23, %24
br i1 %25, label %26, label %52
26: ; preds = %22
%27 = load i64, i64* %10
%28 = load i64, i64* %8
%29 = icmp ugt i64 %27, %28
br i1 %29, label %30, label %33
30: ; preds = %26
%31 = load double, double* %9
store double %31, double* %7
%32 = load i64, i64* %10
store i64 %32, i64* %8
br label %33
33: ; preds = %30, %26
%34 = load double*, double** %4
%35 = load i64, i64* %6
%36 = getelementptr inbounds double, double* %34, i64 %35
%37 = load double, double* %36
%38 = load double, double* %9
%39 = fcmp oeq double %37, %38
br i1 %39, label %40, label %43
40: ; preds = %33
%41 = load i64, i64* %10
%42 = add i64 %41, 1
store i64 %42, i64* %10
br label %48
43: ; preds = %33
%44 = load double*, double** %4
%45 = load i64, i64* %6
%46 = getelementptr inbounds double, double* %44, i64 %45
%47 = load double, double* %46
store double %47, double* %9
store i64 1, i64* %10
br label %48
48: ; preds = %43, %40
br label %49
49: ; preds = %48
%50 = load i64, i64* %6
%51 = add i64 %50, 1
store i64 %51, i64* %6
br label %22
52: ; preds = %22
%53 = load double, double* %7
store double %53, double* %3
br label %54
54: ; preds = %52, %13
%55 = load double, double* %3
ret double %55
}

LLVM IR (-O2):
@EINVAL = global i32 0
@errno = global i32 0
define double @mode(double* nocapture %0, i64 %1) {
%3 = icmp eq i64 %1, 0
br i1 %3, label %4, label %6
4: ; preds = %2
%5 = load i32, i32* @EINVAL
store i32 %5, i32* @errno
br label %54
6: ; preds = %2
%7 = load double, double* %0
%8 = icmp eq i64 %1, 1
br i1 %8, label %54, label %9
9: ; preds = %6
%10 = add i64 %1, -1
%11 = and i64 %10, 1
%12 = icmp eq i64 %1, 2
br i1 %12, label %44, label %13
13: ; preds = %9
%14 = and i64 %10, -2
br label %15
15: ; preds = %15, %13
%16 = phi i64 [ 1, %13 ], [ %40, %15 ]
%17 = phi double [ %7, %13 ], [ %39, %15 ]
%18 = phi i64 [ 1, %13 ], [ %34, %15 ]
%19 = phi double [ %7, %13 ], [ %33, %15 ]
%20 = phi i64 [ 1, %13 ], [ %41, %15 ]
%21 = phi i64 [ 0, %13 ], [ %42, %15 ]
%22 = icmp ugt i64 %16, %18
%23 = select i1 %22, double %17, double %19
%24 = select i1 %22, i64 %16, i64 %18
%25 = getelementptr inbounds double, double* %0, i64 %20
%26 = load double, double* %25
%27 = fcmp oeq double %26, %17
%28 = add i64 %16, 1
%29 = select i1 %27, double %17, double %26
%30 = select i1 %27, i64 %28, i64 1
%31 = add nuw i64 %20, 1
%32 = icmp ugt i64 %30, %24
%33 = select i1 %32, double %29, double %23
%34 = select i1 %32, i64 %30, i64 %24
%35 = getelementptr inbounds double, double* %0, i64 %31
%36 = load double, double* %35
%37 = fcmp oeq double %36, %29
%38 = add i64 %30, 1
%39 = select i1 %37, double %29, double %36
%40 = select i1 %37, i64 %38, i64 1
%41 = add nuw i64 %20, 2
%42 = add i64 %21, 2
%43 = icmp eq i64 %42, %14
br i1 %43, label %44, label %15
44: ; preds = %15, %9
%45 = phi double [ undef, %9 ], [ %33, %15 ]
%46 = phi i64 [ 1, %9 ], [ %40, %15 ]
%47 = phi double [ %7, %9 ], [ %39, %15 ]
%48 = phi i64 [ 1, %9 ], [ %34, %15 ]
%49 = phi double [ %7, %9 ], [ %33, %15 ]
%50 = icmp eq i64 %11, 0
%51 = icmp ugt i64 %46, %48
%52 = select i1 %51, double %47, double %49
%53 = select i1 %50, double %45, double %52
br label %54
54: ; preds = %44, %6, %4
%55 = phi double [ 0.000000e+00, %4 ], [ %7, %6 ], [ %53, %44 ]
ret double %55
}