void vextract(int n, int col, double **mat, double *vec) {
  int i;
  for (i = 0; i < n; i++)
    vec[i] = mat[i][col];
}


x86 assembly (clang, -O0):
<vextract>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %rdx,-0x10(%rbp)
mov    %rcx,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    1155 <vextract+0x55>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x8(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1119 <vextract+0x19>
pop    %rbp
ret

x86 assembly (clang, -O2):
<vextract>:
test   %edi,%edi
jle    11a7 <vextract+0xa7>
movslq %esi,%rax
mov    %edi,%r9d
lea    -0x1(%r9),%rsi
mov    %r9d,%r8d
and    $0x3,%r8d
cmp    $0x3,%rsi
jae    1123 <vextract+0x23>
xor    %esi,%esi
jmp    1177 <vextract+0x77>
and    $0xfffffffc,%r9d
xor    %esi,%esi
nopl   0x0(%rax)
mov    (%rdx,%rsi,8),%rdi
movsd  (%rdi,%rax,8),%xmm0
movsd  %xmm0,(%rcx,%rsi,8)
mov    0x8(%rdx,%rsi,8),%rdi
movsd  (%rdi,%rax,8),%xmm0
movsd  %xmm0,0x8(%rcx,%rsi,8)
mov    0x10(%rdx,%rsi,8),%rdi
movsd  (%rdi,%rax,8),%xmm0
movsd  %xmm0,0x10(%rcx,%rsi,8)
mov    0x18(%rdx,%rsi,8),%rdi
movsd  (%rdi,%rax,8),%xmm0
movsd  %xmm0,0x18(%rcx,%rsi,8)
add    $0x4,%rsi
cmp    %rsi,%r9
jne    1130 <vextract+0x30>
test   %r8,%r8
je     11a7 <vextract+0xa7>
lea    (%rcx,%rsi,8),%rcx
lea    (%rdx,%rsi,8),%rdx
xor    %esi,%esi
cs nopw 0x0(%rax,%rax,1)
mov    (%rdx,%rsi,8),%rdi
movsd  (%rdi,%rax,8),%xmm0
movsd  %xmm0,(%rcx,%rsi,8)
add    $0x1,%rsi
cmp    %rsi,%r8
jne    1190 <vextract+0x90>
ret

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

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