int chol_hsolve(A, v, p)
double *A, *v;
int p;
{
  int i, j;
  for (i = 0; i < p; i++) {
    for (j = 0; j < i; j++)
      v[i] -= A[j * p + i] * v[j];
    v[i] /= A[i * p + i];
  }
  return (p);
}


x86 assembly (clang, -O0):
<chol_hsolve>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
movl   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    11d1 <chol_hsolve+0xd1>
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x18(%rbp),%eax
jge    1197 <chol_hsolve+0x97>
mov    -0x8(%rbp),%rax
mov    -0x1c(%rbp),%ecx
imul   -0x14(%rbp),%ecx
add    -0x18(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movq   %xmm0,%rdx
movabs $0x8000000000000000,%rsi
xor    %rsi,%rdx
movq   %rdx,%xmm0
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1129 <chol_hsolve+0x29>
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%ecx
imul   -0x14(%rbp),%ecx
add    -0x18(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm1
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1116 <chol_hsolve+0x16>
mov    -0x14(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<chol_hsolve>:
push   %r14
push   %rbx
mov    %edx,%eax
test   %edx,%edx
jle    11e2 <chol_hsolve+0xe2>
mov    %eax,%r10d
mov    %r10,%r8
shl    $0x4,%r8
xor    %r14d,%r14d
mov    %rdi,%r9
jmp    114c <chol_hsolve+0x4c>
nop
movsd  (%rsi),%xmm0
mov    %r14d,%ecx
imul   %eax,%ecx
movslq %ecx,%rcx
add    %r14,%rcx
divsd  (%rdi,%rcx,8),%xmm0
movsd  %xmm0,(%rsi,%r14,8)
add    $0x1,%r14
add    $0x8,%r9
cmp    %r10,%r14
je     11e2 <chol_hsolve+0xe2>
test   %r14,%r14
je     1120 <chol_hsolve+0x20>
movsd  (%rsi,%r14,8),%xmm0
cmp    $0x1,%r14
jne    1170 <chol_hsolve+0x70>
xor    %edx,%edx
jmp    11b5 <chol_hsolve+0xb5>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    %r14,%r11
and    $0xfffffffffffffffe,%r11
mov    %r9,%rbx
xor    %edx,%edx
nopl   0x0(%rax)
movsd  (%rbx),%xmm1
mulsd  (%rsi,%rdx,8),%xmm1
subsd  %xmm1,%xmm0
movsd  %xmm0,(%rsi,%r14,8)
movsd  (%rbx,%r10,8),%xmm1
mulsd  0x8(%rsi,%rdx,8),%xmm1
subsd  %xmm1,%xmm0
movsd  %xmm0,(%rsi,%r14,8)
add    $0x2,%rdx
add    %r8,%rbx
cmp    %rdx,%r11
jne    1180 <chol_hsolve+0x80>
test   $0x1,%r14b
je     1124 <chol_hsolve+0x24>
mov    %rdx,%rcx
imul   %r10,%rcx
add    %r14,%rcx
movsd  (%rdi,%rcx,8),%xmm1
mulsd  (%rsi,%rdx,8),%xmm1
subsd  %xmm1,%xmm0
movsd  %xmm0,(%rsi,%r14,8)
jmp    1124 <chol_hsolve+0x24>
pop    %rbx
pop    %r14
ret

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

LLVM IR (-O2):
define i32 @chol_hsolve(double* nocapture %0, double* nocapture %1, i32 returned %2) {
%4 = icmp sgt i32 %2, 0
br i1 %4, label %5, label %70
5: ; preds = %3
%6 = zext i32 %2 to i64
%7 = zext i32 %2 to i64
br label %8
8: ; preds = %5, %59
%9 = phi i64 [ 0, %5 ], [ %68, %59 ]
%10 = trunc i64 %9 to i32
%11 = icmp eq i64 %9, 0
br i1 %11, label %12, label %14
12: ; preds = %8
%13 = load double, double* %1
br label %59
14: ; preds = %8
%15 = getelementptr inbounds double, double* %1, i64 %9
%16 = load double, double* %15
%17 = and i64 %9, 1
%18 = icmp eq i64 %9, 1
br i1 %18, label %45, label %19
19: ; preds = %14
%20 = and i64 %9, 9223372036854775806
br label %21
21: ; preds = %21, %19
%22 = phi double [ %16, %19 ], [ %41, %21 ]
%23 = phi i64 [ 0, %19 ], [ %42, %21 ]
%24 = phi i64 [ 0, %19 ], [ %43, %21 ]
%25 = mul nsw i64 %23, %6
%26 = add nuw nsw i64 %25, %9
%27 = getelementptr inbounds double, double* %0, i64 %26
%28 = load double, double* %27
%29 = getelementptr inbounds double, double* %1, i64 %23
%30 = load double, double* %29
%31 = fneg double %28
%32 = tail call double @llvm.fmuladd.f64(double %31, double %30, double %22)
store double %32, double* %15
%33 = or i64 %23, 1
%34 = mul nsw i64 %33, %6
%35 = add nuw nsw i64 %34, %9
%36 = getelementptr inbounds double, double* %0, i64 %35
%37 = load double, double* %36
%38 = getelementptr inbounds double, double* %1, i64 %33
%39 = load double, double* %38
%40 = fneg double %37
%41 = tail call double @llvm.fmuladd.f64(double %40, double %39, double %32)
store double %41, double* %15
%42 = add nuw nsw i64 %23, 2
%43 = add i64 %24, 2
%44 = icmp eq i64 %43, %20
br i1 %44, label %45, label %21
45: ; preds = %21, %14
%46 = phi double [ undef, %14 ], [ %41, %21 ]
%47 = phi double [ %16, %14 ], [ %41, %21 ]
%48 = phi i64 [ 0, %14 ], [ %42, %21 ]
%49 = icmp eq i64 %17, 0
br i1 %49, label %59, label %50
50: ; preds = %45
%51 = mul nsw i64 %48, %6
%52 = add nuw nsw i64 %51, %9
%53 = getelementptr inbounds double, double* %0, i64 %52
%54 = load double, double* %53
%55 = getelementptr inbounds double, double* %1, i64 %48
%56 = load double, double* %55
%57 = fneg double %54
%58 = tail call double @llvm.fmuladd.f64(double %57, double %56, double %47)
store double %58, double* %15
br label %59
59: ; preds = %50, %45, %12
%60 = phi double [ %13, %12 ], [ %46, %45 ], [ %58, %50 ]
%61 = mul nsw i32 %10, %2
%62 = sext i32 %61 to i64
%63 = add nsw i64 %9, %62
%64 = getelementptr inbounds double, double* %0, i64 %63
%65 = load double, double* %64
%66 = getelementptr inbounds double, double* %1, i64 %9
%67 = fdiv double %60, %65
store double %67, double* %66
%68 = add nuw nsw i64 %9, 1
%69 = icmp eq i64 %68, %7
br i1 %69, label %70, label %8
70: ; preds = %59, %3
ret i32 %2
}