cmp_int_double(i, da) int i;
long da;
{
  double d;
  da -= 1;
  ((short *)&(d))[(1) - 1] = (short)((*(((long *)(da)) + 1)) >> 4);
  ((short *)&(d))[(2) - 1] = (short)((*(((long *)(da)) + 2)) >> 4);
  ((short *)&(d))[(3) - 1] = (short)((*(((long *)(da)) + 3)) >> 4);
  ((short *)&(d))[(4) - 1] = (short)((*(((long *)(da)) + 4)) >> 4);
  i >>= 4;
  if (((double)i) < d)
    return -1;
  else if (((double)i) == d)
    return 0;
  else
    return 1;
}


x86 assembly (clang, -O0):
<cmp_int_double>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
sub    $0x1,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    0x8(%rax),%rax
sar    $0x4,%rax
mov    %ax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    0x10(%rax),%rax
sar    $0x4,%rax
mov    %ax,-0x16(%rbp)
mov    -0x10(%rbp),%rax
mov    0x18(%rax),%rax
sar    $0x4,%rax
mov    %ax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    0x20(%rax),%rax
sar    $0x4,%rax
mov    %ax,-0x12(%rbp)
mov    -0x8(%rbp),%eax
sar    $0x4,%eax
mov    %eax,-0x8(%rbp)
cvtsi2sdl -0x8(%rbp),%xmm1
movsd  -0x18(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    1180 <cmp_int_double+0x80>
movl   $0xffffffff,-0x4(%rbp)
jmp    11a9 <cmp_int_double+0xa9>
cvtsi2sdl -0x8(%rbp),%xmm0
ucomisd -0x18(%rbp),%xmm0
jne    11a2 <cmp_int_double+0xa2>
jp     11a2 <cmp_int_double+0xa2>
movl   $0x0,-0x4(%rbp)
jmp    11a9 <cmp_int_double+0xa9>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<cmp_int_double>:
mov    0x7(%rsi),%eax
mov    0xf(%rsi),%ecx
shr    $0x4,%eax
movzwl %ax,%eax
and    $0xffff0,%ecx
shl    $0xc,%rcx
or     %rax,%rcx
mov    0x17(%rsi),%rax
and    $0xffff0,%eax
shl    $0x1c,%rax
or     %rcx,%rax
mov    0x1f(%rsi),%rcx
and    $0xffff0,%ecx
shl    $0x2c,%rcx
or     %rax,%rcx
movq   %rcx,%xmm0
sar    $0x4,%edi
cvtsi2sd %edi,%xmm1
movapd %xmm1,%xmm2
cmpneqsd %xmm0,%xmm2
movq   %xmm2,%rcx
and    $0x1,%ecx
ucomisd %xmm1,%xmm0
mov    $0xffffffff,%eax
cmovbe %ecx,%eax
ret

LLVM IR (-O0):
define i32 @cmp_int_double(i32 %0, i64 %1) {
%3 = alloca i32
%4 = alloca i32
%5 = alloca i64
%6 = alloca double
store i32 %0, i32* %4
store i64 %1, i64* %5
%7 = load i64, i64* %5
%8 = sub nsw i64 %7, 1
store i64 %8, i64* %5
%9 = load i64, i64* %5
%10 = inttoptr i64 %9 to i64*
%11 = getelementptr inbounds i64, i64* %10, i64 1
%12 = load i64, i64* %11
%13 = ashr i64 %12, 4
%14 = trunc i64 %13 to i16
%15 = bitcast double* %6 to i16*
%16 = getelementptr inbounds i16, i16* %15, i64 0
store i16 %14, i16* %16
%17 = load i64, i64* %5
%18 = inttoptr i64 %17 to i64*
%19 = getelementptr inbounds i64, i64* %18, i64 2
%20 = load i64, i64* %19
%21 = ashr i64 %20, 4
%22 = trunc i64 %21 to i16
%23 = bitcast double* %6 to i16*
%24 = getelementptr inbounds i16, i16* %23, i64 1
store i16 %22, i16* %24
%25 = load i64, i64* %5
%26 = inttoptr i64 %25 to i64*
%27 = getelementptr inbounds i64, i64* %26, i64 3
%28 = load i64, i64* %27
%29 = ashr i64 %28, 4
%30 = trunc i64 %29 to i16
%31 = bitcast double* %6 to i16*
%32 = getelementptr inbounds i16, i16* %31, i64 2
store i16 %30, i16* %32
%33 = load i64, i64* %5
%34 = inttoptr i64 %33 to i64*
%35 = getelementptr inbounds i64, i64* %34, i64 4
%36 = load i64, i64* %35
%37 = ashr i64 %36, 4
%38 = trunc i64 %37 to i16
%39 = bitcast double* %6 to i16*
%40 = getelementptr inbounds i16, i16* %39, i64 3
store i16 %38, i16* %40
%41 = load i32, i32* %4
%42 = ashr i32 %41, 4
store i32 %42, i32* %4
%43 = load i32, i32* %4
%44 = sitofp i32 %43 to double
%45 = load double, double* %6
%46 = fcmp olt double %44, %45
br i1 %46, label %47, label %48
47: ; preds = %2
store i32 -1, i32* %3
br label %55
48: ; preds = %2
%49 = load i32, i32* %4
%50 = sitofp i32 %49 to double
%51 = load double, double* %6
%52 = fcmp oeq double %50, %51
br i1 %52, label %53, label %54
53: ; preds = %48
store i32 0, i32* %3
br label %55
54: ; preds = %48
store i32 1, i32* %3
br label %55
55: ; preds = %54, %53, %47
%56 = load i32, i32* %3
ret i32 %56
}

LLVM IR (-O2):
define i32 @cmp_int_double(i32 %0, i64 %1) {
%3 = add nsw i64 %1, -1
%4 = inttoptr i64 %3 to i64*
%5 = getelementptr inbounds i64, i64* %4, i64 1
%6 = load i64, i64* %5
%7 = lshr i64 %6, 4
%8 = and i64 %7, 65535
%9 = getelementptr inbounds i64, i64* %4, i64 2
%10 = load i64, i64* %9
%11 = shl i64 %10, 12
%12 = and i64 %11, 4294901760
%13 = or i64 %12, %8
%14 = getelementptr inbounds i64, i64* %4, i64 3
%15 = load i64, i64* %14
%16 = shl i64 %15, 28
%17 = and i64 %16, 281470681743360
%18 = or i64 %13, %17
%19 = getelementptr inbounds i64, i64* %4, i64 4
%20 = load i64, i64* %19
%21 = shl i64 %20, 44
%22 = and i64 %21, -281474976710656
%23 = or i64 %18, %22
%24 = bitcast i64 %23 to double
%25 = ashr i32 %0, 4
%26 = sitofp i32 %25 to double
%27 = fcmp olt double %26, %24
%28 = fcmp une double %26, %24
%29 = zext i1 %28 to i32
%30 = select i1 %27, i32 -1, i32 %29
ret i32 %30
}