in_swapd(d) double *d;
{
  union SWAPD {
    double d;
    unsigned char c[4];
  } * u;
  unsigned char t;
  u = (union SWAPD *)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;
}


x86 assembly (clang, -O0):
<in_swapd>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
mov    (%rax),%al
mov    %al,-0x19(%rbp)
mov    -0x18(%rbp),%rax
mov    0x7(%rax),%cl
mov    -0x18(%rbp),%rax
mov    %cl,(%rax)
mov    -0x19(%rbp),%cl
mov    -0x18(%rbp),%rax
mov    %cl,0x7(%rax)
mov    -0x18(%rbp),%rax
mov    0x1(%rax),%al
mov    %al,-0x19(%rbp)
mov    -0x18(%rbp),%rax
mov    0x6(%rax),%cl
mov    -0x18(%rbp),%rax
mov    %cl,0x1(%rax)
mov    -0x19(%rbp),%cl
mov    -0x18(%rbp),%rax
mov    %cl,0x6(%rax)
mov    -0x18(%rbp),%rax
mov    0x2(%rax),%al
mov    %al,-0x19(%rbp)
mov    -0x18(%rbp),%rax
mov    0x5(%rax),%cl
mov    -0x18(%rbp),%rax
mov    %cl,0x2(%rax)
mov    -0x19(%rbp),%cl
mov    -0x18(%rbp),%rax
mov    %cl,0x5(%rax)
mov    -0x18(%rbp),%rax
mov    0x3(%rax),%al
mov    %al,-0x19(%rbp)
mov    -0x18(%rbp),%rax
mov    0x4(%rax),%cl
mov    -0x18(%rbp),%rax
mov    %cl,0x3(%rax)
mov    -0x19(%rbp),%cl
mov    -0x18(%rbp),%rax
mov    %cl,0x4(%rax)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<in_swapd>:
mov    (%rdi),%al
mov    0x7(%rdi),%cl
mov    %cl,(%rdi)
mov    %al,0x7(%rdi)
movzwl 0x1(%rdi),%eax
rol    $0x8,%ax
movzwl 0x5(%rdi),%ecx
rol    $0x8,%cx
mov    %cx,0x1(%rdi)
mov    %ax,0x5(%rdi)
rolw   $0x8,0x3(%rdi)
ret

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

LLVM IR (-O2):
define i32 @in_swapd(double* nocapture %0) {
%2 = bitcast double* %0 to [4 x i8]*
%3 = bitcast double* %0 to i8*
%4 = load i8, i8* %3
%5 = getelementptr inbounds [4 x i8], [4 x i8]* %2, i64 0, i64 7
%6 = load i8, i8* %5
store i8 %6, i8* %3
store i8 %4, i8* %5
%7 = getelementptr inbounds [4 x i8], [4 x i8]* %2, i64 0, i64 1
%8 = load i8, i8* %7
%9 = getelementptr inbounds [4 x i8], [4 x i8]* %2, i64 0, i64 6
%10 = load i8, i8* %9
store i8 %10, i8* %7
store i8 %8, i8* %9
%11 = getelementptr inbounds [4 x i8], [4 x i8]* %2, i64 0, i64 2
%12 = load i8, i8* %11
%13 = getelementptr inbounds [4 x i8], [4 x i8]* %2, i64 0, i64 5
%14 = load i8, i8* %13
store i8 %14, i8* %11
store i8 %12, i8* %13
%15 = getelementptr inbounds [4 x i8], [4 x i8]* %2, i64 0, i64 3
%16 = load i8, i8* %15
%17 = getelementptr inbounds [4 x i8], [4 x i8]* %2, i64 0, i64 4
%18 = load i8, i8* %17
store i8 %18, i8* %15
store i8 %16, i8* %17
ret i32 undef
}