double polyh(double a[], double x, long degree) {
  long i;
  double result = a[degree];
  for (i = degree - 1; i >= 0; i--) {
    result = a[i] + x * result;
  }
  return result;
}


x86 assembly (clang, -O0):
<polyh>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movsd  %xmm0,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x18(%rbp),%rax
sub    $0x1,%rax
mov    %rax,-0x20(%rbp)
cmpq   $0x0,-0x20(%rbp)
jl     116f <polyh+0x6f>
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movsd  -0x10(%rbp),%xmm0
movsd  -0x28(%rbp),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
jmp    112f <polyh+0x2f>
movsd  -0x28(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<polyh>:
movapd %xmm0,%xmm1
movsd  (%rdi,%rsi,8),%xmm0
test   %rsi,%rsi
jle    1172 <polyh+0x72>
lea    -0x1(%rsi),%rax
mov    %rsi,%rcx
and    $0x3,%rcx
je     1134 <polyh+0x34>
nopl   0x0(%rax,%rax,1)
mulsd  %xmm1,%xmm0
addsd  -0x8(%rdi,%rsi,8),%xmm0
add    $0xffffffffffffffff,%rsi
add    $0xffffffffffffffff,%rcx
jne    1120 <polyh+0x20>
cmp    $0x3,%rax
jb     1172 <polyh+0x72>
add    $0x1,%rsi
xchg   %ax,%ax
mulsd  %xmm1,%xmm0
addsd  -0x10(%rdi,%rsi,8),%xmm0
mulsd  %xmm1,%xmm0
addsd  -0x18(%rdi,%rsi,8),%xmm0
mulsd  %xmm1,%xmm0
addsd  -0x20(%rdi,%rsi,8),%xmm0
mulsd  %xmm1,%xmm0
addsd  -0x28(%rdi,%rsi,8),%xmm0
add    $0xfffffffffffffffc,%rsi
cmp    $0x1,%rsi
ja     1140 <polyh+0x40>
ret

LLVM IR (-O0):
define double @polyh(double* %0, double %1, i64 %2) {
%4 = alloca double*
%5 = alloca double
%6 = alloca i64
%7 = alloca i64
%8 = alloca double
store double* %0, double** %4
store double %1, double* %5
store i64 %2, i64* %6
%9 = load double*, double** %4
%10 = load i64, i64* %6
%11 = getelementptr inbounds double, double* %9, i64 %10
%12 = load double, double* %11
store double %12, double* %8
%13 = load i64, i64* %6
%14 = sub nsw i64 %13, 1
store i64 %14, i64* %7
br label %15
15: ; preds = %26, %3
%16 = load i64, i64* %7
%17 = icmp sge i64 %16, 0
br i1 %17, label %18, label %29
18: ; preds = %15
%19 = load double*, double** %4
%20 = load i64, i64* %7
%21 = getelementptr inbounds double, double* %19, i64 %20
%22 = load double, double* %21
%23 = load double, double* %5
%24 = load double, double* %8
%25 = call double @llvm.fmuladd.f64(double %23, double %24, double %22)
store double %25, double* %8
br label %26
26: ; preds = %18
%27 = load i64, i64* %7
%28 = add nsw i64 %27, -1
store i64 %28, i64* %7
br label %15
29: ; preds = %15
%30 = load double, double* %8
ret double %30
}

LLVM IR (-O2):
define double @polyh(double* nocapture %0, double %1, i64 %2) {
%4 = getelementptr inbounds double, double* %0, i64 %2
%5 = load double, double* %4
%6 = icmp sgt i64 %2, 0
br i1 %6, label %7, label %46
7: ; preds = %3
%8 = add i64 %2, -1
%9 = and i64 %2, 3
%10 = icmp eq i64 %9, 0
br i1 %10, label %21, label %11
11: ; preds = %7, %11
%12 = phi i64 [ %15, %11 ], [ %2, %7 ]
%13 = phi double [ %18, %11 ], [ %5, %7 ]
%14 = phi i64 [ %19, %11 ], [ 0, %7 ]
%15 = add nsw i64 %12, -1
%16 = getelementptr inbounds double, double* %0, i64 %15
%17 = load double, double* %16
%18 = tail call double @llvm.fmuladd.f64(double %1, double %13, double %17)
%19 = add i64 %14, 1
%20 = icmp eq i64 %19, %9
br i1 %20, label %21, label %11
21: ; preds = %11, %7
%22 = phi i64 [ %2, %7 ], [ %15, %11 ]
%23 = phi double [ %5, %7 ], [ %18, %11 ]
%24 = phi double [ undef, %7 ], [ %18, %11 ]
%25 = icmp ult i64 %8, 3
br i1 %25, label %46, label %26
26: ; preds = %21, %26
%27 = phi i64 [ %41, %26 ], [ %22, %21 ]
%28 = phi double [ %44, %26 ], [ %23, %21 ]
%29 = add nsw i64 %27, -1
%30 = getelementptr inbounds double, double* %0, i64 %29
%31 = load double, double* %30
%32 = tail call double @llvm.fmuladd.f64(double %1, double %28, double %31)
%33 = add nsw i64 %27, -2
%34 = getelementptr inbounds double, double* %0, i64 %33
%35 = load double, double* %34
%36 = tail call double @llvm.fmuladd.f64(double %1, double %32, double %35)
%37 = add nsw i64 %27, -3
%38 = getelementptr inbounds double, double* %0, i64 %37
%39 = load double, double* %38
%40 = tail call double @llvm.fmuladd.f64(double %1, double %36, double %39)
%41 = add nsw i64 %27, -4
%42 = getelementptr inbounds double, double* %0, i64 %41
%43 = load double, double* %42
%44 = tail call double @llvm.fmuladd.f64(double %1, double %40, double %43)
%45 = icmp ugt i64 %37, 1
br i1 %45, label %26, label %46
46: ; preds = %21, %26, %3
%47 = phi double [ %5, %3 ], [ %24, %21 ], [ %44, %26 ]
ret double %47
}