double max_dvec(int n, double *x) {
  double *ptr = x;
  if (n == 1)
    return *ptr;
  else {
    for (int i = 1; i < n; ++i) {
      if (x[i] > *ptr)
        ptr = &x[i];
    }
  }
  return *ptr;
}


x86 assembly (clang, -O0):
<max_dvec>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0xc(%rbp)
mov    %rsi,-0x18(%rbp)
mov    -0x18(%rbp),%rax
mov    %rax,-0x20(%rbp)
cmpl   $0x1,-0xc(%rbp)
jne    112f <max_dvec+0x2f>
mov    -0x20(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1195 <max_dvec+0x95>
movl   $0x1,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    1183 <max_dvec+0x83>
mov    -0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x20(%rbp),%rax
ucomisd (%rax),%xmm0
jbe    1170 <max_dvec+0x70>
mov    -0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x20(%rbp)
jmp    1175 <max_dvec+0x75>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1136 <max_dvec+0x36>
jmp    1188 <max_dvec+0x88>
mov    -0x20(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<max_dvec>:
cmp    $0x2,%edi
jl     1129 <max_dvec+0x29>
mov    %edi,%eax
lea    -0x1(%rax),%r8
add    $0xfffffffffffffffe,%rax
mov    %r8d,%r9d
and    $0x3,%r9d
cmp    $0x3,%rax
jae    112e <max_dvec+0x2e>
mov    $0x1,%ecx
mov    %rsi,%rdi
jmp    11b9 <max_dvec+0xb9>
movsd  (%rsi),%xmm0
ret
and    $0xfffffffffffffffc,%r8
lea    0x20(%rsi),%rdx
mov    $0xffffffffffffffff,%rcx
mov    %rsi,%rdi
jmp    1166 <max_dvec+0x66>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
add    $0x20,%rdx
lea    (%r8,%rcx,1),%rax
add    $0xfffffffffffffffc,%rax
add    $0xfffffffffffffffc,%rcx
cmp    $0xffffffffffffffff,%rax
je     11b6 <max_dvec+0xb6>
movsd  -0x18(%rdx),%xmm0
ucomisd (%rdi),%xmm0
jbe    1175 <max_dvec+0x75>
lea    -0x18(%rdx),%rdi
movsd  -0x10(%rdx),%xmm0
ucomisd (%rdi),%xmm0
jbe    1184 <max_dvec+0x84>
lea    -0x10(%rdx),%rdi
movsd  -0x8(%rdx),%xmm0
ucomisd (%rdi),%xmm0
ja     11a0 <max_dvec+0xa0>
mov    %rdi,%rax
jmp    11a4 <max_dvec+0xa4>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
lea    -0x8(%rdx),%rax
movsd  (%rdx),%xmm0
ucomisd (%rax),%xmm0
mov    %rdx,%rdi
ja     1150 <max_dvec+0x50>
mov    %rax,%rdi
jmp    1150 <max_dvec+0x50>
neg    %rcx
mov    %rdi,%rdx
test   %r9,%r9
je     11ef <max_dvec+0xef>
lea    (%rsi,%rcx,8),%rcx
jmp    11dd <max_dvec+0xdd>
nopw   0x0(%rax,%rax,1)
add    $0x8,%rcx
mov    %rdx,%rdi
add    $0xffffffffffffffff,%r9
je     11ef <max_dvec+0xef>
movsd  (%rcx),%xmm0
ucomisd (%rdi),%xmm0
mov    %rcx,%rdx
ja     11d0 <max_dvec+0xd0>
mov    %rdi,%rdx
jmp    11d0 <max_dvec+0xd0>
movsd  (%rdx),%xmm0
ret

LLVM IR (-O0):
define double @max_dvec(i32 %0, double* %1) {
%3 = alloca double
%4 = alloca i32
%5 = alloca double*
%6 = alloca double*
%7 = alloca i32
store i32 %0, i32* %4
store double* %1, double** %5
%8 = load double*, double** %5
store double* %8, double** %6
%9 = load i32, i32* %4
%10 = icmp eq i32 %9, 1
br i1 %10, label %11, label %14
11: ; preds = %2
%12 = load double*, double** %6
%13 = load double, double* %12
store double %13, double* %3
br label %41
14: ; preds = %2
store i32 1, i32* %7
br label %15
15: ; preds = %34, %14
%16 = load i32, i32* %7
%17 = load i32, i32* %4
%18 = icmp slt i32 %16, %17
br i1 %18, label %19, label %37
19: ; preds = %15
%20 = load double*, double** %5
%21 = load i32, i32* %7
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds double, double* %20, i64 %22
%24 = load double, double* %23
%25 = load double*, double** %6
%26 = load double, double* %25
%27 = fcmp ogt double %24, %26
br i1 %27, label %28, label %33
28: ; preds = %19
%29 = load double*, double** %5
%30 = load i32, i32* %7
%31 = sext i32 %30 to i64
%32 = getelementptr inbounds double, double* %29, i64 %31
store double* %32, double** %6
br label %33
33: ; preds = %28, %19
br label %34
34: ; preds = %33
%35 = load i32, i32* %7
%36 = add nsw i32 %35, 1
store i32 %36, i32* %7
br label %15
37: ; preds = %15
br label %38
38: ; preds = %37
%39 = load double*, double** %6
%40 = load double, double* %39
store double %40, double* %3
br label %41
41: ; preds = %38, %11
%42 = load double, double* %3
ret double %42
}

LLVM IR (-O2):
define double @max_dvec(i32 %0, double* nocapture %1) {
%3 = icmp sgt i32 %0, 1
br i1 %3, label %4, label %59
4: ; preds = %2
%5 = zext i32 %0 to i64
%6 = add nsw i64 %5, -1
%7 = add nsw i64 %5, -2
%8 = and i64 %6, 3
%9 = icmp ult i64 %7, 3
br i1 %9, label %42, label %10
10: ; preds = %4
%11 = and i64 %6, -4
br label %12
12: ; preds = %12, %10
%13 = phi i64 [ 1, %10 ], [ %39, %12 ]
%14 = phi double* [ %1, %10 ], [ %38, %12 ]
%15 = phi i64 [ 0, %10 ], [ %40, %12 ]
%16 = getelementptr inbounds double, double* %1, i64 %13
%17 = load double, double* %16
%18 = load double, double* %14
%19 = fcmp ogt double %17, %18
%20 = select i1 %19, double* %16, double* %14
%21 = add nuw nsw i64 %13, 1
%22 = getelementptr inbounds double, double* %1, i64 %21
%23 = load double, double* %22
%24 = load double, double* %20
%25 = fcmp ogt double %23, %24
%26 = select i1 %25, double* %22, double* %20
%27 = add nuw nsw i64 %13, 2
%28 = getelementptr inbounds double, double* %1, i64 %27
%29 = load double, double* %28
%30 = load double, double* %26
%31 = fcmp ogt double %29, %30
%32 = select i1 %31, double* %28, double* %26
%33 = add nuw nsw i64 %13, 3
%34 = getelementptr inbounds double, double* %1, i64 %33
%35 = load double, double* %34
%36 = load double, double* %32
%37 = fcmp ogt double %35, %36
%38 = select i1 %37, double* %34, double* %32
%39 = add nuw nsw i64 %13, 4
%40 = add i64 %15, 4
%41 = icmp eq i64 %40, %11
br i1 %41, label %42, label %12
42: ; preds = %12, %4
%43 = phi double* [ undef, %4 ], [ %38, %12 ]
%44 = phi i64 [ 1, %4 ], [ %39, %12 ]
%45 = phi double* [ %1, %4 ], [ %38, %12 ]
%46 = icmp eq i64 %8, 0
br i1 %46, label %59, label %47
47: ; preds = %42, %47
%48 = phi i64 [ %56, %47 ], [ %44, %42 ]
%49 = phi double* [ %55, %47 ], [ %45, %42 ]
%50 = phi i64 [ %57, %47 ], [ 0, %42 ]
%51 = getelementptr inbounds double, double* %1, i64 %48
%52 = load double, double* %51
%53 = load double, double* %49
%54 = fcmp ogt double %52, %53
%55 = select i1 %54, double* %51, double* %49
%56 = add nuw nsw i64 %48, 1
%57 = add i64 %50, 1
%58 = icmp eq i64 %57, %8
br i1 %58, label %59, label %47
59: ; preds = %42, %47, %2
%60 = phi double* [ %1, %2 ], [ %43, %42 ], [ %55, %47 ]
%61 = load double, double* %60
ret double %61
}