double st_max_elementf(int n, double *a) {
  assert(n > 0);
  double res = a[0];
  int i;
  for (i = 1; i < n; i++) {
    {
      typeof(a[i]) t = (a[i]);
      if ((res) < t) {
        (res) = t;
      }
    };
  }
  return res;
}


x86 assembly (clang, -O0):
<st_max_elementf>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
cmpl   $0x0,-0x4(%rbp)
setg   %al
and    $0x1,%al
movzbl %al,%edi
mov    $0x0,%al
call   1030 <assert@plt>
mov    -0x10(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x18(%rbp)
movl   $0x1,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    1195 <st_max_elementf+0x85>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x18(%rbp),%xmm1
movsd  -0x28(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    1182 <st_max_elementf+0x72>
movsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x18(%rbp)
jmp    1187 <st_max_elementf+0x77>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1146 <st_max_elementf+0x36>
movsd  -0x18(%rbp),%xmm0
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<st_max_elementf>:
push   %rbp
push   %rbx
push   %rax
mov    %rsi,%rbx
mov    %edi,%ebp
xor    %edi,%edi
test   %ebp,%ebp
setg   %dil
xor    %eax,%eax
call   1030 <assert@plt>
movsd  (%rbx),%xmm1
cmp    $0x2,%ebp
jl     114c <st_max_elementf+0x3c>
mov    %ebp,%ecx
lea    -0x1(%rcx),%rdx
add    $0xfffffffffffffffe,%rcx
mov    %edx,%eax
and    $0x3,%eax
cmp    $0x3,%rcx
jae    1152 <st_max_elementf+0x42>
mov    $0x1,%ecx
jmp    1195 <st_max_elementf+0x85>
movapd %xmm1,%xmm0
jmp    11c6 <st_max_elementf+0xb6>
and    $0xfffffffffffffffc,%rdx
xor    %ecx,%ecx
nopl   0x0(%rax,%rax,1)
movsd  0x8(%rbx,%rcx,8),%xmm0
maxsd  %xmm1,%xmm0
movsd  0x10(%rbx,%rcx,8),%xmm1
maxsd  %xmm0,%xmm1
movsd  0x18(%rbx,%rcx,8),%xmm0
maxsd  %xmm1,%xmm0
movsd  0x20(%rbx,%rcx,8),%xmm1
maxsd  %xmm0,%xmm1
add    $0x4,%rcx
cmp    %rcx,%rdx
jne    1160 <st_max_elementf+0x50>
add    $0x1,%rcx
movapd %xmm1,%xmm0
test   %rax,%rax
je     11c6 <st_max_elementf+0xb6>
lea    (%rbx,%rcx,8),%rcx
xor    %edx,%edx
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movsd  (%rcx,%rdx,8),%xmm0
maxsd  %xmm1,%xmm0
add    $0x1,%rdx
movapd %xmm0,%xmm1
cmp    %rdx,%rax
jne    11b0 <st_max_elementf+0xa0>
add    $0x8,%rsp
pop    %rbx
pop    %rbp
ret

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

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