int matrix_row_permutation(double *input, int rows, int cols, int row_1,
                           int row_2, double *row_buffer) {
  int j;
  for (j = 0; j < cols; j++) {
    row_buffer[j] = input[row_1 + j * cols];
  }
  for (j = 0; j < cols; j++) {
    input[row_1 + j * cols] = input[row_2 + j * cols];
  }
  for (j = 0; j < cols; j++) {
    input[row_2 + j * cols] = row_buffer[j];
  }
}


x86 assembly (clang, -O0):
<matrix_row_permutation>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    %edx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
mov    %r8d,-0x20(%rbp)
mov    %r9,-0x28(%rbp)
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x18(%rbp),%eax
jge    115f <matrix_row_permutation+0x5f>
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
mov    -0x2c(%rbp),%edx
imul   -0x18(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1120 <matrix_row_permutation+0x20>
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x18(%rbp),%eax
jge    11b0 <matrix_row_permutation+0xb0>
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%ecx
mov    -0x2c(%rbp),%edx
imul   -0x18(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
mov    -0x2c(%rbp),%edx
imul   -0x18(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1166 <matrix_row_permutation+0x66>
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x18(%rbp),%eax
jge    11f6 <matrix_row_permutation+0xf6>
mov    -0x28(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%ecx
mov    -0x2c(%rbp),%edx
imul   -0x18(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    11b7 <matrix_row_permutation+0xb7>
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<matrix_row_permutation>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
test   %edx,%edx
jle    1335 <matrix_row_permutation+0x235>
mov    %rdi,%r10
movslq %ecx,%r14
mov    %edx,%r11d
lea    -0x1(%r11),%rax
mov    %r11d,%r15d
and    $0x3,%r15d
mov    %rax,-0x8(%rsp)
cmp    $0x3,%rax
jae    1135 <matrix_row_permutation+0x35>
xor    %eax,%eax
jmp    11ac <matrix_row_permutation+0xac>
mov    %r11d,%r12d
and    $0xfffffffc,%r12d
mov    %r11,%rax
shl    $0x4,%rax
lea    0x0(,%r14,8),%rsi
lea    (%rax,%r14,8),%r13
mov    %r11,%rbx
shl    $0x5,%rbx
lea    (%r14,%r11,1),%rcx
lea    (%r11,%r11,2),%rax
lea    (%rsi,%rax,8),%rbp
xor    %eax,%eax
mov    %r10,%rdi
nopw   0x0(%rax,%rax,1)
movsd  (%rdi,%rsi,1),%xmm0
movsd  %xmm0,(%r9,%rax,8)
movsd  (%rdi,%rcx,8),%xmm0
movsd  %xmm0,0x8(%r9,%rax,8)
movsd  (%rdi,%r13,1),%xmm0
movsd  %xmm0,0x10(%r9,%rax,8)
movsd  (%rdi,%rbp,1),%xmm0
movsd  %xmm0,0x18(%r9,%rax,8)
add    $0x4,%rax
add    %rbx,%rdi
cmp    %rax,%r12
jne    1170 <matrix_row_permutation+0x70>
test   %r15,%r15
mov    %r10,%r12
je     11e5 <matrix_row_permutation+0xe5>
lea    (%r9,%rax,8),%rcx
imul   %r11,%rax
add    %r14,%rax
lea    (%r12,%rax,8),%rax
lea    0x0(,%r11,8),%rsi
xor    %edi,%edi
nopl   (%rax)
movsd  (%rax),%xmm0
movsd  %xmm0,(%rcx,%rdi,8)
add    $0x1,%rdi
add    %rsi,%rax
cmp    %rdi,%r15
jne    11d0 <matrix_row_permutation+0xd0>
test   %edx,%edx
jle    1335 <matrix_row_permutation+0x235>
movslq %r8d,%r15
cmpq   $0x0,-0x8(%rsp)
je     127d <matrix_row_permutation+0x17d>
mov    %r11d,%ecx
and    $0xfffffffe,%ecx
lea    (%r14,%r11,1),%rsi
mov    %r11,%rbp
shl    $0x4,%rbp
lea    (%r15,%r11,1),%rdi
xor    %eax,%eax
mov    %r12,%rbx
cs nopw 0x0(%rax,%rax,1)
movsd  (%rbx,%r15,8),%xmm0
movsd  %xmm0,(%rbx,%r14,8)
movsd  (%rbx,%rdi,8),%xmm0
movsd  %xmm0,(%rbx,%rsi,8)
add    $0x2,%rax
add    %rbp,%rbx
cmp    %rax,%rcx
jne    1220 <matrix_row_permutation+0x120>
test   $0x1,%r11b
je     125f <matrix_row_permutation+0x15f>
imul   %r11,%rax
lea    (%rax,%r15,1),%rcx
movsd  (%r12,%rcx,8),%xmm0
add    %r14,%rax
movsd  %xmm0,(%r12,%rax,8)
test   %edx,%edx
jle    1335 <matrix_row_permutation+0x235>
mov    %r11d,%r8d
and    $0x3,%r8d
cmpq   $0x3,-0x8(%rsp)
jae    1287 <matrix_row_permutation+0x187>
xor    %eax,%eax
jmp    12fb <matrix_row_permutation+0x1fb>
xor    %eax,%eax
test   $0x1,%r11b
jne    1248 <matrix_row_permutation+0x148>
jmp    125f <matrix_row_permutation+0x15f>
mov    %r11d,%r10d
and    $0xfffffffc,%r10d
mov    %r11,%rax
shl    $0x4,%rax
lea    0x0(,%r15,8),%rbx
lea    (%rax,%r15,8),%rdx
mov    %r11,%rcx
shl    $0x5,%rcx
lea    (%r15,%r11,1),%rsi
lea    (%r11,%r11,2),%rax
lea    (%rbx,%rax,8),%rbp
xor    %eax,%eax
mov    %r12,%rdi
nopl   0x0(%rax)
movsd  (%r9,%rax,8),%xmm0
movsd  %xmm0,(%rdi,%rbx,1)
movsd  0x8(%r9,%rax,8),%xmm0
movsd  %xmm0,(%rdi,%rsi,8)
movsd  0x10(%r9,%rax,8),%xmm0
movsd  %xmm0,(%rdi,%rdx,1)
movsd  0x18(%r9,%rax,8),%xmm0
movsd  %xmm0,(%rdi,%rbp,1)
add    $0x4,%rax
add    %rcx,%rdi
cmp    %rax,%r10
jne    12c0 <matrix_row_permutation+0x1c0>
test   %r8,%r8
je     1335 <matrix_row_permutation+0x235>
lea    (%r9,%rax,8),%rcx
imul   %r11,%rax
add    %r15,%rax
lea    (%r12,%rax,8),%rax
shl    $0x3,%r11
xor    %edx,%edx
cs nopw 0x0(%rax,%rax,1)
nop
movsd  (%rcx,%rdx,8),%xmm0
movsd  %xmm0,(%rax)
add    $0x1,%rdx
add    %r11,%rax
cmp    %rdx,%r8
jne    1320 <matrix_row_permutation+0x220>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i32 @matrix_row_permutation(double* %0, i32 %1, i32 %2, i32 %3, i32 %4, double* %5) {
%7 = alloca i32
%8 = alloca double*
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca double*
%14 = alloca i32
store double* %0, double** %8
store i32 %1, i32* %9
store i32 %2, i32* %10
store i32 %3, i32* %11
store i32 %4, i32* %12
store double* %5, double** %13
store i32 0, i32* %14
br label %15
15: ; preds = %33, %6
%16 = load i32, i32* %14
%17 = load i32, i32* %10
%18 = icmp slt i32 %16, %17
br i1 %18, label %19, label %36
19: ; preds = %15
%20 = load double*, double** %8
%21 = load i32, i32* %11
%22 = load i32, i32* %14
%23 = load i32, i32* %10
%24 = mul nsw i32 %22, %23
%25 = add nsw i32 %21, %24
%26 = sext i32 %25 to i64
%27 = getelementptr inbounds double, double* %20, i64 %26
%28 = load double, double* %27
%29 = load double*, double** %13
%30 = load i32, i32* %14
%31 = sext i32 %30 to i64
%32 = getelementptr inbounds double, double* %29, i64 %31
store double %28, double* %32
br label %33
33: ; preds = %19
%34 = load i32, i32* %14
%35 = add nsw i32 %34, 1
store i32 %35, i32* %14
br label %15
36: ; preds = %15
store i32 0, i32* %14
br label %37
37: ; preds = %59, %36
%38 = load i32, i32* %14
%39 = load i32, i32* %10
%40 = icmp slt i32 %38, %39
br i1 %40, label %41, label %62
41: ; preds = %37
%42 = load double*, double** %8
%43 = load i32, i32* %12
%44 = load i32, i32* %14
%45 = load i32, i32* %10
%46 = mul nsw i32 %44, %45
%47 = add nsw i32 %43, %46
%48 = sext i32 %47 to i64
%49 = getelementptr inbounds double, double* %42, i64 %48
%50 = load double, double* %49
%51 = load double*, double** %8
%52 = load i32, i32* %11
%53 = load i32, i32* %14
%54 = load i32, i32* %10
%55 = mul nsw i32 %53, %54
%56 = add nsw i32 %52, %55
%57 = sext i32 %56 to i64
%58 = getelementptr inbounds double, double* %51, i64 %57
store double %50, double* %58
br label %59
59: ; preds = %41
%60 = load i32, i32* %14
%61 = add nsw i32 %60, 1
store i32 %61, i32* %14
br label %37
62: ; preds = %37
store i32 0, i32* %14
br label %63
63: ; preds = %81, %62
%64 = load i32, i32* %14
%65 = load i32, i32* %10
%66 = icmp slt i32 %64, %65
br i1 %66, label %67, label %84
67: ; preds = %63
%68 = load double*, double** %13
%69 = load i32, i32* %14
%70 = sext i32 %69 to i64
%71 = getelementptr inbounds double, double* %68, i64 %70
%72 = load double, double* %71
%73 = load double*, double** %8
%74 = load i32, i32* %12
%75 = load i32, i32* %14
%76 = load i32, i32* %10
%77 = mul nsw i32 %75, %76
%78 = add nsw i32 %74, %77
%79 = sext i32 %78 to i64
%80 = getelementptr inbounds double, double* %73, i64 %79
store double %72, double* %80
br label %81
81: ; preds = %67
%82 = load i32, i32* %14
%83 = add nsw i32 %82, 1
store i32 %83, i32* %14
br label %63
84: ; preds = %63
%85 = load i32, i32* %7
ret i32 %85
}

LLVM IR (-O2):
define i32 @matrix_row_permutation(double* nocapture %0, i32 %1, i32 %2, i32 %3, i32 %4, double* nocapture %5) {
%7 = icmp sgt i32 %2, 0
br i1 %7, label %8, label %149
8: ; preds = %6
%9 = zext i32 %2 to i64
%10 = sext i32 %3 to i64
%11 = zext i32 %2 to i64
%12 = add nsw i64 %11, -1
%13 = and i64 %11, 3
%14 = icmp ult i64 %12, 3
br i1 %14, label %17, label %15
15: ; preds = %8
%16 = and i64 %11, 4294967292
br label %40
17: ; preds = %40, %8
%18 = phi i64 [ 0, %8 ], [ %66, %40 ]
%19 = icmp eq i64 %13, 0
br i1 %19, label %31, label %20
20: ; preds = %17, %20
%21 = phi i64 [ %28, %20 ], [ %18, %17 ]
%22 = phi i64 [ %29, %20 ], [ 0, %17 ]
%23 = mul nsw i64 %21, %9
%24 = add nsw i64 %23, %10
%25 = getelementptr inbounds double, double* %0, i64 %24
%26 = load double, double* %25
%27 = getelementptr inbounds double, double* %5, i64 %21
store double %26, double* %27
%28 = add nuw nsw i64 %21, 1
%29 = add i64 %22, 1
%30 = icmp eq i64 %29, %13
br i1 %30, label %31, label %20
31: ; preds = %20, %17
br i1 %7, label %32, label %149
32: ; preds = %31
%33 = zext i32 %2 to i64
%34 = sext i32 %4 to i64
%35 = sext i32 %3 to i64
%36 = and i64 %33, 1
%37 = icmp eq i64 %12, 0
br i1 %37, label %69, label %38
38: ; preds = %32
%39 = and i64 %33, 4294967294
br label %87
40: ; preds = %40, %15
%41 = phi i64 [ 0, %15 ], [ %66, %40 ]
%42 = phi i64 [ 0, %15 ], [ %67, %40 ]
%43 = mul nsw i64 %41, %9
%44 = add nsw i64 %43, %10
%45 = getelementptr inbounds double, double* %0, i64 %44
%46 = load double, double* %45
%47 = getelementptr inbounds double, double* %5, i64 %41
store double %46, double* %47
%48 = or i64 %41, 1
%49 = mul nsw i64 %48, %9
%50 = add nsw i64 %49, %10
%51 = getelementptr inbounds double, double* %0, i64 %50
%52 = load double, double* %51
%53 = getelementptr inbounds double, double* %5, i64 %48
store double %52, double* %53
%54 = or i64 %41, 2
%55 = mul nsw i64 %54, %9
%56 = add nsw i64 %55, %10
%57 = getelementptr inbounds double, double* %0, i64 %56
%58 = load double, double* %57
%59 = getelementptr inbounds double, double* %5, i64 %54
store double %58, double* %59
%60 = or i64 %41, 3
%61 = mul nsw i64 %60, %9
%62 = add nsw i64 %61, %10
%63 = getelementptr inbounds double, double* %0, i64 %62
%64 = load double, double* %63
%65 = getelementptr inbounds double, double* %5, i64 %60
store double %64, double* %65
%66 = add nuw nsw i64 %41, 4
%67 = add i64 %42, 4
%68 = icmp eq i64 %67, %16
br i1 %68, label %17, label %40
69: ; preds = %87, %32
%70 = phi i64 [ 0, %32 ], [ %103, %87 ]
%71 = icmp eq i64 %36, 0
br i1 %71, label %79, label %72
72: ; preds = %69
%73 = mul nsw i64 %70, %33
%74 = add nsw i64 %73, %34
%75 = getelementptr inbounds double, double* %0, i64 %74
%76 = load double, double* %75
%77 = add nsw i64 %73, %35
%78 = getelementptr inbounds double, double* %0, i64 %77
store double %76, double* %78
br label %79
79: ; preds = %69, %72
br i1 %7, label %80, label %149
80: ; preds = %79
%81 = zext i32 %2 to i64
%82 = sext i32 %4 to i64
%83 = and i64 %33, 3
%84 = icmp ult i64 %12, 3
br i1 %84, label %135, label %85
85: ; preds = %80
%86 = and i64 %33, 4294967292
br label %106
87: ; preds = %87, %38
%88 = phi i64 [ 0, %38 ], [ %103, %87 ]
%89 = phi i64 [ 0, %38 ], [ %104, %87 ]
%90 = mul nsw i64 %88, %33
%91 = add nsw i64 %90, %34
%92 = getelementptr inbounds double, double* %0, i64 %91
%93 = load double, double* %92
%94 = add nsw i64 %90, %35
%95 = getelementptr inbounds double, double* %0, i64 %94
store double %93, double* %95
%96 = or i64 %88, 1
%97 = mul nsw i64 %96, %33
%98 = add nsw i64 %97, %34
%99 = getelementptr inbounds double, double* %0, i64 %98
%100 = load double, double* %99
%101 = add nsw i64 %97, %35
%102 = getelementptr inbounds double, double* %0, i64 %101
store double %100, double* %102
%103 = add nuw nsw i64 %88, 2
%104 = add i64 %89, 2
%105 = icmp eq i64 %104, %39
br i1 %105, label %69, label %87
106: ; preds = %106, %85
%107 = phi i64 [ 0, %85 ], [ %132, %106 ]
%108 = phi i64 [ 0, %85 ], [ %133, %106 ]
%109 = getelementptr inbounds double, double* %5, i64 %107
%110 = load double, double* %109
%111 = mul nsw i64 %107, %81
%112 = add nsw i64 %111, %82
%113 = getelementptr inbounds double, double* %0, i64 %112
store double %110, double* %113
%114 = or i64 %107, 1
%115 = getelementptr inbounds double, double* %5, i64 %114
%116 = load double, double* %115
%117 = mul nsw i64 %114, %81
%118 = add nsw i64 %117, %82
%119 = getelementptr inbounds double, double* %0, i64 %118
store double %116, double* %119
%120 = or i64 %107, 2
%121 = getelementptr inbounds double, double* %5, i64 %120
%122 = load double, double* %121
%123 = mul nsw i64 %120, %81
%124 = add nsw i64 %123, %82
%125 = getelementptr inbounds double, double* %0, i64 %124
store double %122, double* %125
%126 = or i64 %107, 3
%127 = getelementptr inbounds double, double* %5, i64 %126
%128 = load double, double* %127
%129 = mul nsw i64 %126, %81
%130 = add nsw i64 %129, %82
%131 = getelementptr inbounds double, double* %0, i64 %130
store double %128, double* %131
%132 = add nuw nsw i64 %107, 4
%133 = add i64 %108, 4
%134 = icmp eq i64 %133, %86
br i1 %134, label %135, label %106
135: ; preds = %106, %80
%136 = phi i64 [ 0, %80 ], [ %132, %106 ]
%137 = icmp eq i64 %83, 0
br i1 %137, label %149, label %138
138: ; preds = %135, %138
%139 = phi i64 [ %146, %138 ], [ %136, %135 ]
%140 = phi i64 [ %147, %138 ], [ 0, %135 ]
%141 = getelementptr inbounds double, double* %5, i64 %139
%142 = load double, double* %141
%143 = mul nsw i64 %139, %81
%144 = add nsw i64 %143, %82
%145 = getelementptr inbounds double, double* %0, i64 %144
store double %142, double* %145
%146 = add nuw nsw i64 %139, 1
%147 = add i64 %140, 1
%148 = icmp eq i64 %147, %83
br i1 %148, label %149, label %138
149: ; preds = %135, %138, %6, %31, %79
ret i32 undef
}