#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
double myUlongToDouble(unsigned int);
double pow(double, double);
double ieee_80_to_double(unsigned char *p) {
  unsigned char sign;
  short exp = 0;
  unsigned int mant1 = 0;
  unsigned int mant0 = 0;
  double val;
  exp = *p++;
  exp <<= 8;
  exp |= *p++;
  sign = (exp & 0x8000) ? 1 : 0;
  exp &= 0x7FFF;
  mant1 = *p++;
  mant1 <<= 8;
  mant1 |= *p++;
  mant1 <<= 8;
  mant1 |= *p++;
  mant1 <<= 8;
  mant1 |= *p++;
  mant0 = *p++;
  mant0 <<= 8;
  mant0 |= *p++;
  mant0 <<= 8;
  mant0 |= *p++;
  mant0 <<= 8;
  mant0 |= *p++;
  if (mant1 == 0 && mant0 == 0 && exp == 0 && sign == 0)
    return 0.0;
  else {
    val = myUlongToDouble(mant0) * pow(2.0, -63.0);
    val += myUlongToDouble(mant1) * pow(2.0, -31.0);
    val *= pow(2.0, ((double)exp) - 16383.0);
    return sign ? -val : val;
  }
}


x86 assembly (clang, -O0):
<ieee_80_to_double>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %rdi,-0x10(%rbp)
movw   $0x0,-0x14(%rbp)
movl   $0x0,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movzbl (%rax),%eax
mov    %ax,-0x14(%rbp)
movswl -0x14(%rbp),%eax
shl    $0x8,%eax
mov    %ax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movzbl (%rax),%ecx
movswl -0x14(%rbp),%eax
or     %ecx,%eax
mov    %ax,-0x14(%rbp)
movswl -0x14(%rbp),%edx
and    $0x8000,%edx
xor    %eax,%eax
mov    $0x1,%ecx
cmp    $0x0,%edx
cmovne %ecx,%eax
mov    %al,-0x11(%rbp)
movswl -0x14(%rbp),%eax
and    $0x7fff,%eax
mov    %ax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movzbl (%rax),%eax
mov    %eax,-0x18(%rbp)
mov    -0x18(%rbp),%eax
shl    $0x8,%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movzbl (%rax),%eax
or     -0x18(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x18(%rbp),%eax
shl    $0x8,%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movzbl (%rax),%eax
or     -0x18(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x18(%rbp),%eax
shl    $0x8,%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movzbl (%rax),%eax
or     -0x18(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movzbl (%rax),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
shl    $0x8,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movzbl (%rax),%eax
or     -0x1c(%rbp),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
shl    $0x8,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movzbl (%rax),%eax
or     -0x1c(%rbp),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
shl    $0x8,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movzbl (%rax),%eax
or     -0x1c(%rbp),%eax
mov    %eax,-0x1c(%rbp)
cmpl   $0x0,-0x18(%rbp)
jne    12cf <ieee_80_to_double+0x1af>
cmpl   $0x0,-0x1c(%rbp)
jne    12cf <ieee_80_to_double+0x1af>
movswl -0x14(%rbp),%eax
cmp    $0x0,%eax
jne    12cf <ieee_80_to_double+0x1af>
movzbl -0x11(%rbp),%eax
cmp    $0x0,%eax
jne    12cf <ieee_80_to_double+0x1af>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    13b5 <ieee_80_to_double+0x295>
mov    -0x1c(%rbp),%edi
call   1030 <myUlongToDouble@plt>
movsd  %xmm0,-0x40(%rbp)
movsd  0xd1c(%rip),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  0xd1f(%rip),%xmm1
call   1040 <pow@plt>
movaps %xmm0,%xmm1
movsd  -0x40(%rbp),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x18(%rbp),%edi
call   1030 <myUlongToDouble@plt>
movaps %xmm0,%xmm1
movsd  -0x38(%rbp),%xmm0
movsd  %xmm1,-0x30(%rbp)
movsd  0xcf4(%rip),%xmm1
call   1040 <pow@plt>
movaps %xmm0,%xmm2
movsd  -0x30(%rbp),%xmm0
movsd  -0x28(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
movswl -0x14(%rbp),%eax
cvtsi2sd %eax,%xmm1
movsd  0xcb5(%rip),%xmm0
subsd  %xmm0,%xmm1
movsd  0xca1(%rip),%xmm0
call   1040 <pow@plt>
mulsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x28(%rbp)
movzbl -0x11(%rbp),%eax
cmp    $0x0,%eax
je     13a1 <ieee_80_to_double+0x281>
movsd  -0x28(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x48(%rbp)
jmp    13ab <ieee_80_to_double+0x28b>
movsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
movsd  -0x48(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ieee_80_to_double>:
push   %rbp
push   %r14
push   %rbx
sub    $0x20,%rsp
movzbl (%rdi),%r14d
movzbl 0x1(%rdi),%eax
mov    %r14d,%ebx
and    $0x7f,%ebx
shl    $0x8,%ebx
or     %eax,%ebx
mov    0x2(%rdi),%ebp
mov    0x6(%rdi),%edi
bswap  %ebp
bswap  %edi
test   %ebp,%ebp
jne    115b <ieee_80_to_double+0x3b>
test   %edi,%edi
jne    115b <ieee_80_to_double+0x3b>
test   %bx,%bx
jne    115b <ieee_80_to_double+0x3b>
xorpd  %xmm0,%xmm0
test   %r14b,%r14b
jns    11bd <ieee_80_to_double+0x9d>
call   1040 <myUlongToDouble@plt>
movsd  %xmm0,0x8(%rsp)
mov    %ebp,%edi
call   1040 <myUlongToDouble@plt>
movapd %xmm0,0x10(%rsp)
add    $0xffffc001,%ebx
movsd  0xe7f(%rip),%xmm0
mov    %ebx,%edi
call   1030 <ldexp@plt>
movsd  0x8(%rsp),%xmm1
mulsd  0xe72(%rip),%xmm1
movapd 0x10(%rsp),%xmm2
mulsd  0xe6c(%rip),%xmm2
addsd  %xmm1,%xmm2
mulsd  %xmm0,%xmm2
movapd %xmm2,%xmm0
test   %r14b,%r14b
jns    11bd <ieee_80_to_double+0x9d>
xorpd  0xe63(%rip),%xmm0
add    $0x20,%rsp
pop    %rbx
pop    %r14
pop    %rbp
ret

LLVM IR (-O0):
define double @ieee_80_to_double(i8* %0) {
%2 = alloca double
%3 = alloca i8*
%4 = alloca i8
%5 = alloca i16
%6 = alloca i32
%7 = alloca i32
%8 = alloca double
store i8* %0, i8** %3
store i16 0, i16* %5
store i32 0, i32* %6
store i32 0, i32* %7
%9 = load i8*, i8** %3
%10 = getelementptr inbounds i8, i8* %9, i32 1
store i8* %10, i8** %3
%11 = load i8, i8* %9
%12 = zext i8 %11 to i16
store i16 %12, i16* %5
%13 = load i16, i16* %5
%14 = sext i16 %13 to i32
%15 = shl i32 %14, 8
%16 = trunc i32 %15 to i16
store i16 %16, i16* %5
%17 = load i8*, i8** %3
%18 = getelementptr inbounds i8, i8* %17, i32 1
store i8* %18, i8** %3
%19 = load i8, i8* %17
%20 = zext i8 %19 to i32
%21 = load i16, i16* %5
%22 = sext i16 %21 to i32
%23 = or i32 %22, %20
%24 = trunc i32 %23 to i16
store i16 %24, i16* %5
%25 = load i16, i16* %5
%26 = sext i16 %25 to i32
%27 = and i32 %26, 32768
%28 = icmp ne i32 %27, 0
%29 = zext i1 %28 to i64
%30 = select i1 %28, i32 1, i32 0
%31 = trunc i32 %30 to i8
store i8 %31, i8* %4
%32 = load i16, i16* %5
%33 = sext i16 %32 to i32
%34 = and i32 %33, 32767
%35 = trunc i32 %34 to i16
store i16 %35, i16* %5
%36 = load i8*, i8** %3
%37 = getelementptr inbounds i8, i8* %36, i32 1
store i8* %37, i8** %3
%38 = load i8, i8* %36
%39 = zext i8 %38 to i32
store i32 %39, i32* %6
%40 = load i32, i32* %6
%41 = shl i32 %40, 8
store i32 %41, i32* %6
%42 = load i8*, i8** %3
%43 = getelementptr inbounds i8, i8* %42, i32 1
store i8* %43, i8** %3
%44 = load i8, i8* %42
%45 = zext i8 %44 to i32
%46 = load i32, i32* %6
%47 = or i32 %46, %45
store i32 %47, i32* %6
%48 = load i32, i32* %6
%49 = shl i32 %48, 8
store i32 %49, i32* %6
%50 = load i8*, i8** %3
%51 = getelementptr inbounds i8, i8* %50, i32 1
store i8* %51, i8** %3
%52 = load i8, i8* %50
%53 = zext i8 %52 to i32
%54 = load i32, i32* %6
%55 = or i32 %54, %53
store i32 %55, i32* %6
%56 = load i32, i32* %6
%57 = shl i32 %56, 8
store i32 %57, i32* %6
%58 = load i8*, i8** %3
%59 = getelementptr inbounds i8, i8* %58, i32 1
store i8* %59, i8** %3
%60 = load i8, i8* %58
%61 = zext i8 %60 to i32
%62 = load i32, i32* %6
%63 = or i32 %62, %61
store i32 %63, i32* %6
%64 = load i8*, i8** %3
%65 = getelementptr inbounds i8, i8* %64, i32 1
store i8* %65, i8** %3
%66 = load i8, i8* %64
%67 = zext i8 %66 to i32
store i32 %67, i32* %7
%68 = load i32, i32* %7
%69 = shl i32 %68, 8
store i32 %69, i32* %7
%70 = load i8*, i8** %3
%71 = getelementptr inbounds i8, i8* %70, i32 1
store i8* %71, i8** %3
%72 = load i8, i8* %70
%73 = zext i8 %72 to i32
%74 = load i32, i32* %7
%75 = or i32 %74, %73
store i32 %75, i32* %7
%76 = load i32, i32* %7
%77 = shl i32 %76, 8
store i32 %77, i32* %7
%78 = load i8*, i8** %3
%79 = getelementptr inbounds i8, i8* %78, i32 1
store i8* %79, i8** %3
%80 = load i8, i8* %78
%81 = zext i8 %80 to i32
%82 = load i32, i32* %7
%83 = or i32 %82, %81
store i32 %83, i32* %7
%84 = load i32, i32* %7
%85 = shl i32 %84, 8
store i32 %85, i32* %7
%86 = load i8*, i8** %3
%87 = getelementptr inbounds i8, i8* %86, i32 1
store i8* %87, i8** %3
%88 = load i8, i8* %86
%89 = zext i8 %88 to i32
%90 = load i32, i32* %7
%91 = or i32 %90, %89
store i32 %91, i32* %7
%92 = load i32, i32* %6
%93 = icmp eq i32 %92, 0
br i1 %93, label %94, label %106
94: ; preds = %1
%95 = load i32, i32* %7
%96 = icmp eq i32 %95, 0
br i1 %96, label %97, label %106
97: ; preds = %94
%98 = load i16, i16* %5
%99 = sext i16 %98 to i32
%100 = icmp eq i32 %99, 0
br i1 %100, label %101, label %106
101: ; preds = %97
%102 = load i8, i8* %4
%103 = zext i8 %102 to i32
%104 = icmp eq i32 %103, 0
br i1 %104, label %105, label %106
105: ; preds = %101
store double 0.000000e+00, double* %2
br label %132
106: ; preds = %101, %97, %94, %1
%107 = load i32, i32* %7
%108 = call double @myUlongToDouble(i32 %107)
%109 = call double @pow(double 2.000000e+00, double -6.300000e+01)
%110 = fmul double %108, %109
store double %110, double* %8
%111 = load i32, i32* %6
%112 = call double @myUlongToDouble(i32 %111)
%113 = call double @pow(double 2.000000e+00, double -3.100000e+01)
%114 = load double, double* %8
%115 = call double @llvm.fmuladd.f64(double %112, double %113, double %114)
store double %115, double* %8
%116 = load i16, i16* %5
%117 = sitofp i16 %116 to double
%118 = fsub double %117, 1.638300e+04
%119 = call double @pow(double 2.000000e+00, double %118)
%120 = load double, double* %8
%121 = fmul double %120, %119
store double %121, double* %8
%122 = load i8, i8* %4
%123 = zext i8 %122 to i32
%124 = icmp ne i32 %123, 0
br i1 %124, label %125, label %128
125: ; preds = %106
%126 = load double, double* %8
%127 = fneg double %126
br label %130
128: ; preds = %106
%129 = load double, double* %8
br label %130
130: ; preds = %128, %125
%131 = phi double [ %127, %125 ], [ %129, %128 ]
store double %131, double* %2
br label %132
132: ; preds = %130, %105
%133 = load double, double* %2
ret double %133
}

LLVM IR (-O2):
define double @ieee_80_to_double(i8* nocapture %0) {
%2 = getelementptr inbounds i8, i8* %0, i64 1
%3 = load i8, i8* %0
%4 = zext i8 %3 to i16
%5 = shl nuw i16 %4, 8
%6 = getelementptr inbounds i8, i8* %0, i64 2
%7 = load i8, i8* %2
%8 = zext i8 %7 to i16
%9 = and i16 %5, 32512
%10 = or i16 %9, %8
%11 = getelementptr inbounds i8, i8* %0, i64 3
%12 = load i8, i8* %6
%13 = zext i8 %12 to i32
%14 = getelementptr inbounds i8, i8* %0, i64 4
%15 = load i8, i8* %11
%16 = zext i8 %15 to i32
%17 = shl nuw nsw i32 %13, 16
%18 = shl nuw nsw i32 %16, 8
%19 = or i32 %18, %17
%20 = getelementptr inbounds i8, i8* %0, i64 5
%21 = load i8, i8* %14
%22 = zext i8 %21 to i32
%23 = or i32 %19, %22
%24 = shl nuw i32 %23, 8
%25 = getelementptr inbounds i8, i8* %0, i64 6
%26 = load i8, i8* %20
%27 = zext i8 %26 to i32
%28 = or i32 %24, %27
%29 = getelementptr inbounds i8, i8* %0, i64 7
%30 = load i8, i8* %25
%31 = zext i8 %30 to i32
%32 = getelementptr inbounds i8, i8* %0, i64 8
%33 = load i8, i8* %29
%34 = zext i8 %33 to i32
%35 = shl nuw nsw i32 %31, 16
%36 = shl nuw nsw i32 %34, 8
%37 = or i32 %36, %35
%38 = getelementptr inbounds i8, i8* %0, i64 9
%39 = load i8, i8* %32
%40 = zext i8 %39 to i32
%41 = or i32 %37, %40
%42 = shl nuw i32 %41, 8
%43 = load i8, i8* %38
%44 = zext i8 %43 to i32
%45 = or i32 %42, %44
%46 = icmp eq i32 %28, 0
%47 = icmp eq i32 %45, 0
%48 = select i1 %46, i1 %47, i1 false
%49 = icmp eq i16 %10, 0
%50 = select i1 %48, i1 %49, i1 false
%51 = icmp sgt i8 %3, -1
%52 = select i1 %50, i1 %51, i1 false
br i1 %52, label %64, label %53
53: ; preds = %1
%54 = tail call double @myUlongToDouble(i32 %45)
%55 = fmul double %54, 0x3C00000000000000
%56 = tail call double @myUlongToDouble(i32 %28)
%57 = tail call double @llvm.fmuladd.f64(double %56, double 0x3E00000000000000, double %55)
%58 = add nsw i16 %10, -16383
%59 = sext i16 %58 to i32
%60 = tail call double @ldexp(double 1.000000e+00, i32 %59)
%61 = fmul double %57, %60
%62 = fneg double %61
%63 = select i1 %51, double %61, double %62
br label %64
64: ; preds = %1, %53
%65 = phi double [ %63, %53 ], [ 0.000000e+00, %1 ]
ret double %65
}