double harm(long n) {
  double h = 0.0;
  long i;
  for (i = 1; i <= n; i++)
    h += 1.0 / (double)i;
  return h;
}


x86 assembly (clang, -O0):
<harm>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x10(%rbp)
movq   $0x1,-0x18(%rbp)
mov    -0x18(%rbp),%rax
cmp    -0x8(%rbp),%rax
jg     1153 <harm+0x53>
cvtsi2sdq -0x18(%rbp),%xmm1
movsd  0xecc(%rip),%xmm0
divsd  %xmm1,%xmm0
addsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x10(%rbp)
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    1118 <harm+0x18>
movsd  -0x10(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<harm>:
test   %rdi,%rdi
jle    111f <harm+0x1f>
cmp    $0x1,%rdi
jne    1123 <harm+0x23>
xorpd  %xmm0,%xmm0
movsd  0xee9(%rip),%xmm1
test   $0x1,%dil
jne    1183 <harm+0x83>
jmp    1193 <harm+0x93>
xorps  %xmm0,%xmm0
ret
mov    %rdi,%rax
and    $0xfffffffffffffffe,%rax
xorpd  %xmm0,%xmm0
mov    $0x1,%ecx
movsd  0xec5(%rip),%xmm1
nopl   0x0(%rax,%rax,1)
xorps  %xmm2,%xmm2
cvtsi2sd %rcx,%xmm2
movapd %xmm1,%xmm3
divsd  %xmm2,%xmm3
addsd  %xmm0,%xmm3
lea    0x1(%rcx),%rdx
xorps  %xmm2,%xmm2
cvtsi2sd %rdx,%xmm2
movapd %xmm1,%xmm0
divsd  %xmm2,%xmm0
addsd  %xmm3,%xmm0
add    $0x2,%rcx
cmp    %rax,%rdx
jne    1140 <harm+0x40>
xorps  %xmm1,%xmm1
cvtsi2sd %rcx,%xmm1
test   $0x1,%dil
je     1193 <harm+0x93>
movsd  0xe75(%rip),%xmm2
divsd  %xmm1,%xmm2
addsd  %xmm2,%xmm0
ret

LLVM IR (-O0):
define double @harm(i64 %0) {
%2 = alloca i64
%3 = alloca double
%4 = alloca i64
store i64 %0, i64* %2
store double 0.000000e+00, double* %3
store i64 1, i64* %4
br label %5
5: ; preds = %15, %1
%6 = load i64, i64* %4
%7 = load i64, i64* %2
%8 = icmp sle i64 %6, %7
br i1 %8, label %9, label %18
9: ; preds = %5
%10 = load i64, i64* %4
%11 = sitofp i64 %10 to double
%12 = fdiv double 1.000000e+00, %11
%13 = load double, double* %3
%14 = fadd double %13, %12
store double %14, double* %3
br label %15
15: ; preds = %9
%16 = load i64, i64* %4
%17 = add nsw i64 %16, 1
store i64 %17, i64* %4
br label %5
18: ; preds = %5
%19 = load double, double* %3
ret double %19
}

LLVM IR (-O2):
define double @harm(i64 %0) {
%2 = icmp slt i64 %0, 1
br i1 %2, label %32, label %3
3: ; preds = %1
%4 = and i64 %0, 1
%5 = icmp eq i64 %0, 1
br i1 %5, label %24, label %6
6: ; preds = %3
%7 = and i64 %0, -2
br label %8
8: ; preds = %8, %6
%9 = phi i64 [ 1, %6 ], [ %19, %8 ]
%10 = phi double [ 0.000000e+00, %6 ], [ %18, %8 ]
%11 = phi i64 [ 0, %6 ], [ %20, %8 ]
%12 = sitofp i64 %9 to double
%13 = fdiv double 1.000000e+00, %12
%14 = fadd double %10, %13
%15 = add nuw i64 %9, 1
%16 = sitofp i64 %15 to double
%17 = fdiv double 1.000000e+00, %16
%18 = fadd double %14, %17
%19 = add nuw i64 %9, 2
%20 = add i64 %11, 2
%21 = icmp eq i64 %20, %7
br i1 %21, label %22, label %8
22: ; preds = %8
%23 = sitofp i64 %19 to double
br label %24
24: ; preds = %22, %3
%25 = phi double [ undef, %3 ], [ %18, %22 ]
%26 = phi double [ 1.000000e+00, %3 ], [ %23, %22 ]
%27 = phi double [ 0.000000e+00, %3 ], [ %18, %22 ]
%28 = icmp eq i64 %4, 0
br i1 %28, label %32, label %29
29: ; preds = %24
%30 = fdiv double 1.000000e+00, %26
%31 = fadd double %27, %30
br label %32
32: ; preds = %29, %24, %1
%33 = phi double [ 0.000000e+00, %1 ], [ %25, %24 ], [ %31, %29 ]
ret double %33
}