double dilog_series(const double z) {
  double r = 0.0, zk;
  int k, k2;
  for (k = 1, k2 = 1, zk = z; k <= 44; k2 += 2 * k + 1, k++, zk *= z)
    r += zk / (double)k2;
  return r;
}


x86 assembly (clang, -O0):
<dilog_series>:
push   %rbp
mov    %rsp,%rbp
movsd  %xmm0,-0x8(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x10(%rbp)
movl   $0x1,-0x1c(%rbp)
movl   $0x1,-0x20(%rbp)
movsd  -0x8(%rbp),%xmm0
movsd  %xmm0,-0x18(%rbp)
cmpl   $0x2c,-0x1c(%rbp)
jg     1177 <dilog_series+0x77>
movsd  -0x18(%rbp),%xmm0
cvtsi2sdl -0x20(%rbp),%xmm1
divsd  %xmm1,%xmm0
addsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x10(%rbp)
mov    -0x1c(%rbp),%eax
shl    $0x1,%eax
add    $0x1,%eax
add    -0x20(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
movsd  -0x8(%rbp),%xmm0
mulsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x18(%rbp)
jmp    1129 <dilog_series+0x29>
movsd  -0x10(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<dilog_series>:
xorpd  %xmm1,%xmm1
mov    $0x1,%ecx
mov    $0x5,%eax
movapd %xmm0,%xmm2
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
xorps  %xmm3,%xmm3
cvtsi2sd %ecx,%xmm3
movapd %xmm2,%xmm4
divsd  %xmm3,%xmm4
addsd  %xmm1,%xmm4
lea    (%rax,%rcx,1),%edx
lea    -0x2(%rax,%rcx,1),%ecx
mulsd  %xmm0,%xmm2
xorps  %xmm3,%xmm3
cvtsi2sd %ecx,%xmm3
movapd %xmm2,%xmm1
divsd  %xmm3,%xmm1
addsd  %xmm4,%xmm1
lea    (%rax,%rdx,1),%ecx
add    $0xfffffffe,%ecx
mulsd  %xmm0,%xmm2
add    $0x4,%eax
cmp    $0x5d,%eax
jne    1120 <dilog_series+0x20>
movapd %xmm1,%xmm0
ret

LLVM IR (-O0):
define double @dilog_series(double %0) {
%2 = alloca double
%3 = alloca double
%4 = alloca double
%5 = alloca i32
%6 = alloca i32
store double %0, double* %2
store double 0.000000e+00, double* %3
store i32 1, i32* %5
store i32 1, i32* %6
%7 = load double, double* %2
store double %7, double* %4
br label %8
8: ; preds = %18, %1
%9 = load i32, i32* %5
%10 = icmp sle i32 %9, 44
br i1 %10, label %11, label %29
11: ; preds = %8
%12 = load double, double* %4
%13 = load i32, i32* %6
%14 = sitofp i32 %13 to double
%15 = fdiv double %12, %14
%16 = load double, double* %3
%17 = fadd double %16, %15
store double %17, double* %3
br label %18
18: ; preds = %11
%19 = load i32, i32* %5
%20 = mul nsw i32 2, %19
%21 = add nsw i32 %20, 1
%22 = load i32, i32* %6
%23 = add nsw i32 %22, %21
store i32 %23, i32* %6
%24 = load i32, i32* %5
%25 = add nsw i32 %24, 1
store i32 %25, i32* %5
%26 = load double, double* %2
%27 = load double, double* %4
%28 = fmul double %27, %26
store double %28, double* %4
br label %8
29: ; preds = %8
%30 = load double, double* %3
ret double %30
}

LLVM IR (-O2):
define double @dilog_series(double %0) {
br label %2
2: ; preds = %2, %1
%3 = phi i32 [ 1, %1 ], [ %20, %2 ]
%4 = phi i32 [ 1, %1 ], [ %21, %2 ]
%5 = phi double [ %0, %1 ], [ %22, %2 ]
%6 = phi double [ 0.000000e+00, %1 ], [ %16, %2 ]
%7 = sitofp i32 %3 to double
%8 = fdiv double %5, %7
%9 = fadd double %6, %8
%10 = shl nuw nsw i32 %4, 1
%11 = or i32 %10, 1
%12 = add nuw nsw i32 %11, %3
%13 = fmul double %5, %0
%14 = sitofp i32 %12 to double
%15 = fdiv double %13, %14
%16 = fadd double %9, %15
%17 = shl nuw i32 %4, 1
%18 = add i32 %17, 2
%19 = or i32 %18, 1
%20 = add nuw nsw i32 %19, %12
%21 = add nuw nsw i32 %4, 2
%22 = fmul double %13, %0
%23 = icmp eq i32 %21, 45
br i1 %23, label %24, label %2
24: ; preds = %2
ret double %16
}