void realnums_permute(double *farr, int *indices, double *r_farr, int size) {
  int i;
  for (i = 0; i < size; i++)
    r_farr[i] = farr[indices[i]];
}


x86 assembly (clang, -O0):
<realnums_permute>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1156 <realnums_permute+0x56>
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x20(%rbp),%rdx
movslq (%rcx,%rdx,4),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    111a <realnums_permute+0x1a>
pop    %rbp
ret

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

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