int blasDSWAP(int n, double *dx, int incx, double *dy, int incy) {
  double dtmp;
  if (n > 0) {
    incx *= sizeof(double);
    incy *= sizeof(double);
    dtmp = (*dx);
    *dx = (*dy);
    *dy = dtmp;
    while ((--n) > 0) {
      dx = (double *)((char *)dx + incx);
      dy = (double *)((char *)dy + incy);
      dtmp = (*dx);
      *dx = (*dy);
      *dy = dtmp;
    }
  }
  return (0);
}


x86 assembly (clang, -O0):
<blasDSWAP>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8d,-0x24(%rbp)
cmpl   $0x0,-0x4(%rbp)
jle    11c4 <blasDSWAP+0xc4>
movslq -0x14(%rbp),%rax
shl    $0x3,%rax
mov    %eax,-0x14(%rbp)
movslq -0x24(%rbp),%rax
shl    $0x3,%rax
mov    %eax,-0x24(%rbp)
mov    -0x10(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x20(%rbp),%rax
movsd  (%rax),%xmm0
mov    -0x10(%rbp),%rax
movsd  %xmm0,(%rax)
movsd  -0x30(%rbp),%xmm0
mov    -0x20(%rbp),%rax
movsd  %xmm0,(%rax)
mov    -0x4(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x4(%rbp)
cmp    $0x0,%eax
jle    11bf <blasDSWAP+0xbf>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
add    %rcx,%rax
mov    %rax,-0x10(%rbp)
mov    -0x20(%rbp),%rax
movslq -0x24(%rbp),%rcx
add    %rcx,%rax
mov    %rax,-0x20(%rbp)
mov    -0x10(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x20(%rbp),%rax
movsd  (%rax),%xmm0
mov    -0x10(%rbp),%rax
movsd  %xmm0,(%rax)
movsd  -0x30(%rbp),%xmm0
mov    -0x20(%rbp),%rax
movsd  %xmm0,(%rax)
jmp    1160 <blasDSWAP+0x60>
jmp    11c4 <blasDSWAP+0xc4>
xor    %eax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<blasDSWAP>:
test   %edi,%edi
jle    114e <blasDSWAP+0x4e>
movsd  (%rsi),%xmm0
movsd  (%rcx),%xmm1
movsd  %xmm1,(%rsi)
movsd  %xmm0,(%rcx)
cmp    $0x1,%edi
je     114e <blasDSWAP+0x4e>
shl    $0x3,%r8d
shl    $0x3,%edx
movslq %edx,%rax
movslq %r8d,%rdx
add    %rdx,%rcx
add    %rax,%rsi
add    $0x1,%edi
nop
movsd  (%rsi),%xmm0
movsd  (%rcx),%xmm1
movsd  %xmm1,(%rsi)
movsd  %xmm0,(%rcx)
add    %rdx,%rcx
add    %rax,%rsi
add    $0xffffffff,%edi
cmp    $0x2,%edi
ja     1130 <blasDSWAP+0x30>
xor    %eax,%eax
ret

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

LLVM IR (-O2):
define i32 @blasDSWAP(i32 %0, double* nocapture %1, i32 %2, double* nocapture %3, i32 %4) {
%6 = icmp sgt i32 %0, 0
br i1 %6, label %7, label %30
7: ; preds = %5
%8 = load double, double* %1
%9 = load double, double* %3
store double %9, double* %1
store double %8, double* %3
%10 = icmp eq i32 %0, 1
br i1 %10, label %30, label %11
11: ; preds = %7
%12 = shl i32 %4, 3
%13 = shl i32 %2, 3
%14 = sext i32 %13 to i64
%15 = sext i32 %12 to i64
br label %16
16: ; preds = %11, %16
%17 = phi double* [ %3, %11 ], [ %26, %16 ]
%18 = phi double* [ %1, %11 ], [ %23, %16 ]
%19 = phi i32 [ %0, %11 ], [ %20, %16 ]
%20 = add nsw i32 %19, -1
%21 = bitcast double* %18 to i8*
%22 = getelementptr inbounds i8, i8* %21, i64 %14
%23 = bitcast i8* %22 to double*
%24 = bitcast double* %17 to i8*
%25 = getelementptr inbounds i8, i8* %24, i64 %15
%26 = bitcast i8* %25 to double*
%27 = load double, double* %23
%28 = load double, double* %26
store double %28, double* %23
store double %27, double* %26
%29 = icmp ugt i32 %19, 2
br i1 %29, label %16, label %30
30: ; preds = %16, %7, %5
ret i32 0
}