int stuffdouble(double data, unsigned char *buffer, unsigned short *index) {
  unsigned long long *tempp, temp;
  tempp = (unsigned long long *)&data;
  temp = *tempp;
  buffer[*index] = (temp >> 0) & 0xff;
  *index += 1;
  buffer[*index] = (temp >> 8) & 0xff;
  *index += 1;
  buffer[*index] = (temp >> 16) & 0xff;
  *index += 1;
  buffer[*index] = (temp >> 24) & 0xff;
  *index += 1;
  buffer[*index] = (temp >> 32) & 0xff;
  *index += 1;
  buffer[*index] = (temp >> 40) & 0xff;
  *index += 1;
  buffer[*index] = (temp >> 48) & 0xff;
  *index += 1;
  buffer[*index] = (temp >> 56) & 0xff;
  *index += 1;
  return (*index);
}


x86 assembly (clang, -O0):
<stuffdouble>:
push   %rbp
mov    %rsp,%rbp
movsd  %xmm0,-0x8(%rbp)
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
lea    -0x8(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
shr    $0x0,%rax
and    $0xff,%rax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movzwl (%rcx),%ecx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%rax
movzwl (%rax),%ecx
add    $0x1,%ecx
mov    %cx,(%rax)
mov    -0x28(%rbp),%rax
shr    $0x8,%rax
and    $0xff,%rax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movzwl (%rcx),%ecx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%rax
movzwl (%rax),%ecx
add    $0x1,%ecx
mov    %cx,(%rax)
mov    -0x28(%rbp),%rax
shr    $0x10,%rax
and    $0xff,%rax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movzwl (%rcx),%ecx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%rax
movzwl (%rax),%ecx
add    $0x1,%ecx
mov    %cx,(%rax)
mov    -0x28(%rbp),%rax
shr    $0x18,%rax
and    $0xff,%rax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movzwl (%rcx),%ecx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%rax
movzwl (%rax),%ecx
add    $0x1,%ecx
mov    %cx,(%rax)
mov    -0x28(%rbp),%rax
shr    $0x20,%rax
and    $0xff,%rax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movzwl (%rcx),%ecx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%rax
movzwl (%rax),%ecx
add    $0x1,%ecx
mov    %cx,(%rax)
mov    -0x28(%rbp),%rax
shr    $0x28,%rax
and    $0xff,%rax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movzwl (%rcx),%ecx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%rax
movzwl (%rax),%ecx
add    $0x1,%ecx
mov    %cx,(%rax)
mov    -0x28(%rbp),%rax
shr    $0x30,%rax
and    $0xff,%rax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movzwl (%rcx),%ecx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%rax
movzwl (%rax),%ecx
add    $0x1,%ecx
mov    %cx,(%rax)
mov    -0x28(%rbp),%rax
shr    $0x38,%rax
and    $0xff,%rax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movzwl (%rcx),%ecx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%rax
movzwl (%rax),%ecx
add    $0x1,%ecx
mov    %cx,(%rax)
mov    -0x18(%rbp),%rax
movzwl (%rax),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<stuffdouble>:
movq   %xmm0,%rax
movzwl (%rsi),%ecx
mov    %al,(%rdi,%rcx,1)
movzwl (%rsi),%ecx
add    $0x1,%ecx
mov    %cx,(%rsi)
movzwl %cx,%ecx
mov    %ah,(%rdi,%rcx,1)
movzwl (%rsi),%ecx
add    $0x1,%ecx
mov    %cx,(%rsi)
mov    %rax,%rdx
shr    $0x10,%rdx
movzwl %cx,%ecx
mov    %dl,(%rdi,%rcx,1)
movzwl (%rsi),%ecx
add    $0x1,%ecx
mov    %cx,(%rsi)
mov    %rax,%rdx
shr    $0x18,%rdx
movzwl %cx,%ecx
mov    %dl,(%rdi,%rcx,1)
movzwl (%rsi),%ecx
add    $0x1,%ecx
mov    %cx,(%rsi)
mov    %rax,%rdx
shr    $0x20,%rdx
movzwl %cx,%ecx
mov    %dl,(%rdi,%rcx,1)
movzwl (%rsi),%ecx
add    $0x1,%ecx
mov    %cx,(%rsi)
mov    %rax,%rdx
shr    $0x28,%rdx
movzwl %cx,%ecx
mov    %dl,(%rdi,%rcx,1)
movzwl (%rsi),%ecx
add    $0x1,%ecx
mov    %cx,(%rsi)
mov    %rax,%rdx
shr    $0x30,%rdx
movzwl %cx,%ecx
mov    %dl,(%rdi,%rcx,1)
movzwl (%rsi),%ecx
add    $0x1,%ecx
mov    %cx,(%rsi)
shr    $0x38,%rax
movzwl %cx,%ecx
mov    %al,(%rdi,%rcx,1)
movzwl (%rsi),%eax
add    $0x1,%eax
mov    %ax,(%rsi)
movzwl %ax,%eax
ret

LLVM IR (-O0):
define i32 @stuffdouble(double %0, i8* %1, i16* %2) {
%4 = alloca double
%5 = alloca i8*
%6 = alloca i16*
%7 = alloca i64*
%8 = alloca i64
store double %0, double* %4
store i8* %1, i8** %5
store i16* %2, i16** %6
%9 = bitcast double* %4 to i64*
store i64* %9, i64** %7
%10 = load i64*, i64** %7
%11 = load i64, i64* %10
store i64 %11, i64* %8
%12 = load i64, i64* %8
%13 = lshr i64 %12, 0
%14 = and i64 %13, 255
%15 = trunc i64 %14 to i8
%16 = load i8*, i8** %5
%17 = load i16*, i16** %6
%18 = load i16, i16* %17
%19 = zext i16 %18 to i64
%20 = getelementptr inbounds i8, i8* %16, i64 %19
store i8 %15, i8* %20
%21 = load i16*, i16** %6
%22 = load i16, i16* %21
%23 = zext i16 %22 to i32
%24 = add nsw i32 %23, 1
%25 = trunc i32 %24 to i16
store i16 %25, i16* %21
%26 = load i64, i64* %8
%27 = lshr i64 %26, 8
%28 = and i64 %27, 255
%29 = trunc i64 %28 to i8
%30 = load i8*, i8** %5
%31 = load i16*, i16** %6
%32 = load i16, i16* %31
%33 = zext i16 %32 to i64
%34 = getelementptr inbounds i8, i8* %30, i64 %33
store i8 %29, i8* %34
%35 = load i16*, i16** %6
%36 = load i16, i16* %35
%37 = zext i16 %36 to i32
%38 = add nsw i32 %37, 1
%39 = trunc i32 %38 to i16
store i16 %39, i16* %35
%40 = load i64, i64* %8
%41 = lshr i64 %40, 16
%42 = and i64 %41, 255
%43 = trunc i64 %42 to i8
%44 = load i8*, i8** %5
%45 = load i16*, i16** %6
%46 = load i16, i16* %45
%47 = zext i16 %46 to i64
%48 = getelementptr inbounds i8, i8* %44, i64 %47
store i8 %43, i8* %48
%49 = load i16*, i16** %6
%50 = load i16, i16* %49
%51 = zext i16 %50 to i32
%52 = add nsw i32 %51, 1
%53 = trunc i32 %52 to i16
store i16 %53, i16* %49
%54 = load i64, i64* %8
%55 = lshr i64 %54, 24
%56 = and i64 %55, 255
%57 = trunc i64 %56 to i8
%58 = load i8*, i8** %5
%59 = load i16*, i16** %6
%60 = load i16, i16* %59
%61 = zext i16 %60 to i64
%62 = getelementptr inbounds i8, i8* %58, i64 %61
store i8 %57, i8* %62
%63 = load i16*, i16** %6
%64 = load i16, i16* %63
%65 = zext i16 %64 to i32
%66 = add nsw i32 %65, 1
%67 = trunc i32 %66 to i16
store i16 %67, i16* %63
%68 = load i64, i64* %8
%69 = lshr i64 %68, 32
%70 = and i64 %69, 255
%71 = trunc i64 %70 to i8
%72 = load i8*, i8** %5
%73 = load i16*, i16** %6
%74 = load i16, i16* %73
%75 = zext i16 %74 to i64
%76 = getelementptr inbounds i8, i8* %72, i64 %75
store i8 %71, i8* %76
%77 = load i16*, i16** %6
%78 = load i16, i16* %77
%79 = zext i16 %78 to i32
%80 = add nsw i32 %79, 1
%81 = trunc i32 %80 to i16
store i16 %81, i16* %77
%82 = load i64, i64* %8
%83 = lshr i64 %82, 40
%84 = and i64 %83, 255
%85 = trunc i64 %84 to i8
%86 = load i8*, i8** %5
%87 = load i16*, i16** %6
%88 = load i16, i16* %87
%89 = zext i16 %88 to i64
%90 = getelementptr inbounds i8, i8* %86, i64 %89
store i8 %85, i8* %90
%91 = load i16*, i16** %6
%92 = load i16, i16* %91
%93 = zext i16 %92 to i32
%94 = add nsw i32 %93, 1
%95 = trunc i32 %94 to i16
store i16 %95, i16* %91
%96 = load i64, i64* %8
%97 = lshr i64 %96, 48
%98 = and i64 %97, 255
%99 = trunc i64 %98 to i8
%100 = load i8*, i8** %5
%101 = load i16*, i16** %6
%102 = load i16, i16* %101
%103 = zext i16 %102 to i64
%104 = getelementptr inbounds i8, i8* %100, i64 %103
store i8 %99, i8* %104
%105 = load i16*, i16** %6
%106 = load i16, i16* %105
%107 = zext i16 %106 to i32
%108 = add nsw i32 %107, 1
%109 = trunc i32 %108 to i16
store i16 %109, i16* %105
%110 = load i64, i64* %8
%111 = lshr i64 %110, 56
%112 = and i64 %111, 255
%113 = trunc i64 %112 to i8
%114 = load i8*, i8** %5
%115 = load i16*, i16** %6
%116 = load i16, i16* %115
%117 = zext i16 %116 to i64
%118 = getelementptr inbounds i8, i8* %114, i64 %117
store i8 %113, i8* %118
%119 = load i16*, i16** %6
%120 = load i16, i16* %119
%121 = zext i16 %120 to i32
%122 = add nsw i32 %121, 1
%123 = trunc i32 %122 to i16
store i16 %123, i16* %119
%124 = load i16*, i16** %6
%125 = load i16, i16* %124
%126 = zext i16 %125 to i32
ret i32 %126
}

LLVM IR (-O2):
define i32 @stuffdouble(double %0, i8* nocapture writeonly %1, i16* nocapture %2) {
%4 = bitcast double %0 to i64
%5 = trunc i64 %4 to i8
%6 = load i16, i16* %2
%7 = zext i16 %6 to i64
%8 = getelementptr inbounds i8, i8* %1, i64 %7
store i8 %5, i8* %8
%9 = load i16, i16* %2
%10 = add i16 %9, 1
store i16 %10, i16* %2
%11 = lshr i64 %4, 8
%12 = trunc i64 %11 to i8
%13 = zext i16 %10 to i64
%14 = getelementptr inbounds i8, i8* %1, i64 %13
store i8 %12, i8* %14
%15 = load i16, i16* %2
%16 = add i16 %15, 1
store i16 %16, i16* %2
%17 = lshr i64 %4, 16
%18 = trunc i64 %17 to i8
%19 = zext i16 %16 to i64
%20 = getelementptr inbounds i8, i8* %1, i64 %19
store i8 %18, i8* %20
%21 = load i16, i16* %2
%22 = add i16 %21, 1
store i16 %22, i16* %2
%23 = lshr i64 %4, 24
%24 = trunc i64 %23 to i8
%25 = zext i16 %22 to i64
%26 = getelementptr inbounds i8, i8* %1, i64 %25
store i8 %24, i8* %26
%27 = load i16, i16* %2
%28 = add i16 %27, 1
store i16 %28, i16* %2
%29 = lshr i64 %4, 32
%30 = trunc i64 %29 to i8
%31 = zext i16 %28 to i64
%32 = getelementptr inbounds i8, i8* %1, i64 %31
store i8 %30, i8* %32
%33 = load i16, i16* %2
%34 = add i16 %33, 1
store i16 %34, i16* %2
%35 = lshr i64 %4, 40
%36 = trunc i64 %35 to i8
%37 = zext i16 %34 to i64
%38 = getelementptr inbounds i8, i8* %1, i64 %37
store i8 %36, i8* %38
%39 = load i16, i16* %2
%40 = add i16 %39, 1
store i16 %40, i16* %2
%41 = lshr i64 %4, 48
%42 = trunc i64 %41 to i8
%43 = zext i16 %40 to i64
%44 = getelementptr inbounds i8, i8* %1, i64 %43
store i8 %42, i8* %44
%45 = load i16, i16* %2
%46 = add i16 %45, 1
store i16 %46, i16* %2
%47 = lshr i64 %4, 56
%48 = trunc i64 %47 to i8
%49 = zext i16 %46 to i64
%50 = getelementptr inbounds i8, i8* %1, i64 %49
store i8 %48, i8* %50
%51 = load i16, i16* %2
%52 = add i16 %51, 1
store i16 %52, i16* %2
%53 = zext i16 %52 to i32
ret i32 %53
}