#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 size_t uint64_t;

/* Variables and functions */
void f_to_s_sum_F8(double *X, uint64_t nR, double *ptr_rslt) {
  *ptr_rslt = 0;
  for (uint64_t i = 0; i < nR; i++) {
    *ptr_rslt += X[i];
  }
}


x86 assembly (clang, -O0):
<f_to_s_sum_F8>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    -0x18(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax)
movq   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmp    -0x10(%rbp),%rax
jae    115b <f_to_s_sum_F8+0x5b>
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
addsd  (%rax),%xmm0
movsd  %xmm0,(%rax)
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    1123 <f_to_s_sum_F8+0x23>
pop    %rbp
ret

x86 assembly (clang, -O2):
<f_to_s_sum_F8>:
movq   $0x0,(%rdx)
test   %rsi,%rsi
je     1182 <f_to_s_sum_F8+0x82>
lea    -0x1(%rsi),%rcx
mov    %esi,%eax
and    $0x3,%eax
cmp    $0x3,%rcx
jae    1123 <f_to_s_sum_F8+0x23>
xorpd  %xmm0,%xmm0
xor    %ecx,%ecx
jmp    1160 <f_to_s_sum_F8+0x60>
and    $0xfffffffffffffffc,%rsi
xorpd  %xmm0,%xmm0
xor    %ecx,%ecx
nopl   (%rax)
addsd  (%rdi,%rcx,8),%xmm0
movsd  %xmm0,(%rdx)
addsd  0x8(%rdi,%rcx,8),%xmm0
movsd  %xmm0,(%rdx)
addsd  0x10(%rdi,%rcx,8),%xmm0
movsd  %xmm0,(%rdx)
addsd  0x18(%rdi,%rcx,8),%xmm0
movsd  %xmm0,(%rdx)
add    $0x4,%rcx
cmp    %rcx,%rsi
jne    1130 <f_to_s_sum_F8+0x30>
test   %rax,%rax
je     1182 <f_to_s_sum_F8+0x82>
lea    (%rdi,%rcx,8),%rcx
xor    %esi,%esi
nopl   0x0(%rax,%rax,1)
addsd  (%rcx,%rsi,8),%xmm0
movsd  %xmm0,(%rdx)
add    $0x1,%rsi
cmp    %rsi,%rax
jne    1170 <f_to_s_sum_F8+0x70>
ret

LLVM IR (-O0):
define void @f_to_s_sum_F8(double* %0, i64 %1, double* %2) {
%4 = alloca double*
%5 = alloca i64
%6 = alloca double*
%7 = alloca i64
store double* %0, double** %4
store i64 %1, i64* %5
store double* %2, double** %6
%8 = load double*, double** %6
store double 0.000000e+00, double* %8
store i64 0, i64* %7
br label %9
9: ; preds = %21, %3
%10 = load i64, i64* %7
%11 = load i64, i64* %5
%12 = icmp ult i64 %10, %11
br i1 %12, label %13, label %24
13: ; preds = %9
%14 = load double*, double** %4
%15 = load i64, i64* %7
%16 = getelementptr inbounds double, double* %14, i64 %15
%17 = load double, double* %16
%18 = load double*, double** %6
%19 = load double, double* %18
%20 = fadd double %19, %17
store double %20, double* %18
br label %21
21: ; preds = %13
%22 = load i64, i64* %7
%23 = add i64 %22, 1
store i64 %23, i64* %7
br label %9
24: ; preds = %9
ret void
}

LLVM IR (-O2):
define void @f_to_s_sum_F8(double* nocapture %0, i64 %1, double* nocapture %2) {
store double 0.000000e+00, double* %2
%4 = icmp eq i64 %1, 0
br i1 %4, label %25, label %5
5: ; preds = %3
%6 = add i64 %1, -1
%7 = and i64 %1, 3
%8 = icmp ult i64 %6, 3
br i1 %8, label %11, label %9
9: ; preds = %5
%10 = and i64 %1, -4
br label %26
11: ; preds = %26, %5
%12 = phi double [ 0.000000e+00, %5 ], [ %44, %26 ]
%13 = phi i64 [ 0, %5 ], [ %45, %26 ]
%14 = icmp eq i64 %7, 0
br i1 %14, label %25, label %15
15: ; preds = %11, %15
%16 = phi double [ %21, %15 ], [ %12, %11 ]
%17 = phi i64 [ %22, %15 ], [ %13, %11 ]
%18 = phi i64 [ %23, %15 ], [ 0, %11 ]
%19 = getelementptr inbounds double, double* %0, i64 %17
%20 = load double, double* %19
%21 = fadd double %20, %16
store double %21, double* %2
%22 = add nuw i64 %17, 1
%23 = add i64 %18, 1
%24 = icmp eq i64 %23, %7
br i1 %24, label %25, label %15
25: ; preds = %11, %15, %3
ret void
26: ; preds = %26, %9
%27 = phi double [ 0.000000e+00, %9 ], [ %44, %26 ]
%28 = phi i64 [ 0, %9 ], [ %45, %26 ]
%29 = phi i64 [ 0, %9 ], [ %46, %26 ]
%30 = getelementptr inbounds double, double* %0, i64 %28
%31 = load double, double* %30
%32 = fadd double %31, %27
store double %32, double* %2
%33 = or i64 %28, 1
%34 = getelementptr inbounds double, double* %0, i64 %33
%35 = load double, double* %34
%36 = fadd double %35, %32
store double %36, double* %2
%37 = or i64 %28, 2
%38 = getelementptr inbounds double, double* %0, i64 %37
%39 = load double, double* %38
%40 = fadd double %39, %36
store double %40, double* %2
%41 = or i64 %28, 3
%42 = getelementptr inbounds double, double* %0, i64 %41
%43 = load double, double* %42
%44 = fadd double %43, %40
store double %44, double* %2
%45 = add nuw i64 %28, 4
%46 = add i64 %29, 4
%47 = icmp eq i64 %46, %10
br i1 %47, label %11, label %26
}