void hornerd(int n, double z, double *x, double *f, double p[2]) {
  int i = 0;
  p[0] = f[n - 1];
  p[1] = 0;
  for (i = n - 2; i >= 0; i--) {
    p[1] = p[0] + (z - x[i]) * p[1];
    p[0] = f[i] + (z - x[i]) * p[0];
  }
}


x86 assembly (clang, -O0):
<hornerd>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
movsd  %xmm0,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    %rcx,-0x28(%rbp)
movl   $0x0,-0x2c(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x4(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
movsd  %xmm0,(%rax)
mov    -0x28(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,0x8(%rax)
mov    -0x4(%rbp),%eax
sub    $0x2,%eax
mov    %eax,-0x2c(%rbp)
cmpl   $0x0,-0x2c(%rbp)
jl     11d1 <hornerd+0xd1>
mov    -0x28(%rbp),%rax
movsd  (%rax),%xmm1
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x2c(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
movsd  0x8(%rax),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x28(%rbp),%rax
movsd  %xmm0,0x8(%rax)
mov    -0x20(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x2c(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
movsd  (%rax),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x28(%rbp),%rax
movsd  %xmm0,(%rax)
mov    -0x2c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x2c(%rbp)
jmp    114e <hornerd+0x4e>
pop    %rbp
ret

x86 assembly (clang, -O2):
<hornerd>:
movslq %edi,%rax
movsd  -0x8(%rdx,%rax,8),%xmm1
movsd  %xmm1,(%rcx)
movq   $0x0,0x8(%rcx)
cmp    $0x2,%eax
jl     11e5 <hornerd+0xe5>
add    $0xfffffffe,%edi
xorpd  %xmm2,%xmm2
test   $0x1,%dil
jne    116a <hornerd+0x6a>
movapd %xmm0,%xmm3
subsd  (%rsi,%rdi,8),%xmm3
xorpd  %xmm2,%xmm2
mulsd  %xmm3,%xmm2
addsd  %xmm1,%xmm2
movsd  %xmm2,0x8(%rcx)
movapd %xmm0,%xmm3
subsd  (%rsi,%rdi,8),%xmm3
mulsd  %xmm1,%xmm3
addsd  (%rdx,%rdi,8),%xmm3
movsd  %xmm3,(%rcx)
lea    -0x1(%rdi),%rax
movapd %xmm3,%xmm1
test   %rdi,%rdi
jne    1180 <hornerd+0x80>
jmp    11e5 <hornerd+0xe5>
mov    %rdi,%rax
test   %rdi,%rdi
je     11e5 <hornerd+0xe5>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movapd %xmm0,%xmm3
subsd  (%rsi,%rax,8),%xmm3
mulsd  %xmm2,%xmm3
addsd  %xmm1,%xmm3
movsd  %xmm3,0x8(%rcx)
movapd %xmm0,%xmm4
subsd  (%rsi,%rax,8),%xmm4
mulsd  %xmm1,%xmm4
addsd  (%rdx,%rax,8),%xmm4
movsd  %xmm4,(%rcx)
movapd %xmm0,%xmm2
subsd  -0x8(%rsi,%rax,8),%xmm2
mulsd  %xmm3,%xmm2
addsd  %xmm4,%xmm2
movsd  %xmm2,0x8(%rcx)
movapd %xmm0,%xmm1
subsd  -0x8(%rsi,%rax,8),%xmm1
mulsd  %xmm4,%xmm1
addsd  -0x8(%rdx,%rax,8),%xmm1
movsd  %xmm1,(%rcx)
add    $0xfffffffffffffffe,%rax
cmp    $0xffffffffffffffff,%rax
jne    1180 <hornerd+0x80>
ret

LLVM IR (-O0):
define void @hornerd(i32 %0, double %1, double* %2, double* %3, double* %4) {
%6 = alloca i32
%7 = alloca double
%8 = alloca double*
%9 = alloca double*
%10 = alloca double*
%11 = alloca i32
store i32 %0, i32* %6
store double %1, double* %7
store double* %2, double** %8
store double* %3, double** %9
store double* %4, double** %10
store i32 0, i32* %11
%12 = load double*, double** %9
%13 = load i32, i32* %6
%14 = sub nsw i32 %13, 1
%15 = sext i32 %14 to i64
%16 = getelementptr inbounds double, double* %12, i64 %15
%17 = load double, double* %16
%18 = load double*, double** %10
%19 = getelementptr inbounds double, double* %18, i64 0
store double %17, double* %19
%20 = load double*, double** %10
%21 = getelementptr inbounds double, double* %20, i64 1
store double 0.000000e+00, double* %21
%22 = load i32, i32* %6
%23 = sub nsw i32 %22, 2
store i32 %23, i32* %11
br label %24
24: ; preds = %62, %5
%25 = load i32, i32* %11
%26 = icmp sge i32 %25, 0
br i1 %26, label %27, label %65
27: ; preds = %24
%28 = load double*, double** %10
%29 = getelementptr inbounds double, double* %28, i64 0
%30 = load double, double* %29
%31 = load double, double* %7
%32 = load double*, double** %8
%33 = load i32, i32* %11
%34 = sext i32 %33 to i64
%35 = getelementptr inbounds double, double* %32, i64 %34
%36 = load double, double* %35
%37 = fsub double %31, %36
%38 = load double*, double** %10
%39 = getelementptr inbounds double, double* %38, i64 1
%40 = load double, double* %39
%41 = call double @llvm.fmuladd.f64(double %37, double %40, double %30)
%42 = load double*, double** %10
%43 = getelementptr inbounds double, double* %42, i64 1
store double %41, double* %43
%44 = load double*, double** %9
%45 = load i32, i32* %11
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds double, double* %44, i64 %46
%48 = load double, double* %47
%49 = load double, double* %7
%50 = load double*, double** %8
%51 = load i32, i32* %11
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds double, double* %50, i64 %52
%54 = load double, double* %53
%55 = fsub double %49, %54
%56 = load double*, double** %10
%57 = getelementptr inbounds double, double* %56, i64 0
%58 = load double, double* %57
%59 = call double @llvm.fmuladd.f64(double %55, double %58, double %48)
%60 = load double*, double** %10
%61 = getelementptr inbounds double, double* %60, i64 0
store double %59, double* %61
br label %62
62: ; preds = %27
%63 = load i32, i32* %11
%64 = add nsw i32 %63, -1
store i32 %64, i32* %11
br label %24
65: ; preds = %24
ret void
}

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