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


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

x86 assembly (clang, -O2):
<extractdouble>:
movzwl (%rsi),%r8d
movzbl (%rdi,%r8,1),%ecx
lea    0x1(%r8),%edx
mov    %dx,(%rsi)
movzwl %dx,%edx
movzbl (%rdi,%rdx,1),%edx
shl    $0x8,%rdx
or     %rcx,%rdx
lea    0x2(%r8),%ecx
mov    %cx,(%rsi)
movzwl %cx,%ecx
movzbl (%rdi,%rcx,1),%ecx
shl    $0x10,%rcx
or     %rdx,%rcx
lea    0x3(%r8),%edx
mov    %dx,(%rsi)
movzwl %dx,%edx
movzbl (%rdi,%rdx,1),%edx
shl    $0x18,%rdx
or     %rcx,%rdx
lea    0x4(%r8),%ecx
mov    %cx,(%rsi)
movzwl %cx,%ecx
movzbl (%rdi,%rcx,1),%eax
shl    $0x20,%rax
or     %rdx,%rax
lea    0x5(%r8),%ecx
mov    %cx,(%rsi)
movzwl %cx,%ecx
movzbl (%rdi,%rcx,1),%ecx
shl    $0x28,%rcx
or     %rax,%rcx
lea    0x6(%r8),%eax
mov    %ax,(%rsi)
movzwl %ax,%eax
movzbl (%rdi,%rax,1),%eax
shl    $0x30,%rax
lea    0x7(%r8),%edx
mov    %dx,(%rsi)
movzwl %dx,%edx
movzbl (%rdi,%rdx,1),%edx
shl    $0x38,%rdx
or     %rax,%rdx
or     %rcx,%rdx
lea    0x8(%r8),%eax
mov    %ax,(%rsi)
movq   %rdx,%xmm0
ret

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

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