double swapd(d)
double *d;
{
  union {
    double d;
    unsigned char c[sizeof(double)];
  } u;
  unsigned char t;
  u.d = *d;
  t = u.c[0];
  u.c[0] = u.c[7];
  u.c[7] = t;
  t = u.c[1];
  u.c[1] = u.c[6];
  u.c[6] = t;
  t = u.c[2];
  u.c[2] = u.c[5];
  u.c[5] = t;
  t = u.c[3];
  u.c[3] = u.c[4];
  u.c[4] = t;
  return (u.d);
}


x86 assembly (clang, -O0):
<swapd>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    -0x8(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x10(%rbp)
mov    -0x10(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0x9(%rbp),%al
mov    %al,-0x10(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0x9(%rbp)
mov    -0xf(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0xa(%rbp),%al
mov    %al,-0xf(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0xa(%rbp)
mov    -0xe(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0xb(%rbp),%al
mov    %al,-0xe(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0xb(%rbp)
mov    -0xd(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0xc(%rbp),%al
mov    %al,-0xd(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0xc(%rbp)
movsd  -0x10(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<swapd>:
mov    (%rdi),%rax
bswap  %rax
movq   %rax,%xmm0
ret

LLVM IR (-O0):
%union.anon = type { double }
define double @swapd(double* %0) {
%2 = alloca double*
%3 = alloca %union.anon
%4 = alloca i8
store double* %0, double** %2
%5 = load double*, double** %2
%6 = load double, double* %5
%7 = bitcast %union.anon* %3 to double*
store double %6, double* %7
%8 = bitcast %union.anon* %3 to [8 x i8]*
%9 = getelementptr inbounds [8 x i8], [8 x i8]* %8, i64 0, i64 0
%10 = load i8, i8* %9
store i8 %10, i8* %4
%11 = bitcast %union.anon* %3 to [8 x i8]*
%12 = getelementptr inbounds [8 x i8], [8 x i8]* %11, i64 0, i64 7
%13 = load i8, i8* %12
%14 = bitcast %union.anon* %3 to [8 x i8]*
%15 = getelementptr inbounds [8 x i8], [8 x i8]* %14, i64 0, i64 0
store i8 %13, i8* %15
%16 = load i8, i8* %4
%17 = bitcast %union.anon* %3 to [8 x i8]*
%18 = getelementptr inbounds [8 x i8], [8 x i8]* %17, i64 0, i64 7
store i8 %16, i8* %18
%19 = bitcast %union.anon* %3 to [8 x i8]*
%20 = getelementptr inbounds [8 x i8], [8 x i8]* %19, i64 0, i64 1
%21 = load i8, i8* %20
store i8 %21, i8* %4
%22 = bitcast %union.anon* %3 to [8 x i8]*
%23 = getelementptr inbounds [8 x i8], [8 x i8]* %22, i64 0, i64 6
%24 = load i8, i8* %23
%25 = bitcast %union.anon* %3 to [8 x i8]*
%26 = getelementptr inbounds [8 x i8], [8 x i8]* %25, i64 0, i64 1
store i8 %24, i8* %26
%27 = load i8, i8* %4
%28 = bitcast %union.anon* %3 to [8 x i8]*
%29 = getelementptr inbounds [8 x i8], [8 x i8]* %28, i64 0, i64 6
store i8 %27, i8* %29
%30 = bitcast %union.anon* %3 to [8 x i8]*
%31 = getelementptr inbounds [8 x i8], [8 x i8]* %30, i64 0, i64 2
%32 = load i8, i8* %31
store i8 %32, i8* %4
%33 = bitcast %union.anon* %3 to [8 x i8]*
%34 = getelementptr inbounds [8 x i8], [8 x i8]* %33, i64 0, i64 5
%35 = load i8, i8* %34
%36 = bitcast %union.anon* %3 to [8 x i8]*
%37 = getelementptr inbounds [8 x i8], [8 x i8]* %36, i64 0, i64 2
store i8 %35, i8* %37
%38 = load i8, i8* %4
%39 = bitcast %union.anon* %3 to [8 x i8]*
%40 = getelementptr inbounds [8 x i8], [8 x i8]* %39, i64 0, i64 5
store i8 %38, i8* %40
%41 = bitcast %union.anon* %3 to [8 x i8]*
%42 = getelementptr inbounds [8 x i8], [8 x i8]* %41, i64 0, i64 3
%43 = load i8, i8* %42
store i8 %43, i8* %4
%44 = bitcast %union.anon* %3 to [8 x i8]*
%45 = getelementptr inbounds [8 x i8], [8 x i8]* %44, i64 0, i64 4
%46 = load i8, i8* %45
%47 = bitcast %union.anon* %3 to [8 x i8]*
%48 = getelementptr inbounds [8 x i8], [8 x i8]* %47, i64 0, i64 3
store i8 %46, i8* %48
%49 = load i8, i8* %4
%50 = bitcast %union.anon* %3 to [8 x i8]*
%51 = getelementptr inbounds [8 x i8], [8 x i8]* %50, i64 0, i64 4
store i8 %49, i8* %51
%52 = bitcast %union.anon* %3 to double*
%53 = load double, double* %52
ret double %53
}

LLVM IR (-O2):
define double @swapd(double* nocapture %0) {
%2 = bitcast double* %0 to i64*
%3 = load i64, i64* %2
%4 = tail call i64 @llvm.bswap.i64(i64 %3)
%5 = bitcast i64 %4 to double
ret double %5
}