long double remquol(long double x, long double y, int *quo) {
  signed char *cx = (void *)&x, *cy = (void *)&y;
  __asm__("" ::"X"(cx), "X"(cy));
  long double t = x;
  unsigned fpsr;
  do
    __asm__("fprem1; fnstsw %%ax" : "+t"(t), "=a"(fpsr) : "u"(y));
  while (fpsr & 0x400);
  unsigned char i = fpsr >> 8;
  i = i >> 4 | i << 4;
  unsigned qbits = 0x7575313164642020 >> (i & 60);
  qbits &= 7;
  *quo = (cx[9] ^ cy[9]) < 0 ? -qbits : qbits;
  return t;
}


x86 assembly (clang, -O0):
<remquol>:
push   %rbp
mov    %rsp,%rbp
fldt   0x20(%rbp)
fldt   0x10(%rbp)
fstpt  -0x10(%rbp)
fstpt  -0x20(%rbp)
mov    %rdi,-0x28(%rbp)
lea    -0x10(%rbp),%rax
mov    %rax,-0x30(%rbp)
lea    -0x20(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x30(%rbp),%rax
mov    -0x38(%rbp),%rcx
fldt   -0x10(%rbp)
fstpt  -0x50(%rbp)
fldt   -0x50(%rbp)
fldt   -0x20(%rbp)
fxch   %st(1)
fprem1
fnstsw %ax
fstp   %st(1)
fstpt  -0x50(%rbp)
mov    %eax,-0x54(%rbp)
mov    -0x54(%rbp),%eax
and    $0x400,%eax
cmp    $0x0,%eax
jne    1132 <remquol+0x32>
mov    -0x54(%rbp),%eax
shr    $0x8,%eax
mov    %al,-0x55(%rbp)
movzbl -0x55(%rbp),%eax
sar    $0x4,%eax
movzbl -0x55(%rbp),%ecx
shl    $0x4,%ecx
or     %ecx,%eax
mov    %al,-0x55(%rbp)
movzbl -0x55(%rbp),%eax
and    $0x3c,%eax
mov    %eax,%eax
mov    %eax,%ecx
movabs $0x7575313164642020,%rax
31 75 75
sar    %cl,%rax
mov    %eax,-0x5c(%rbp)
mov    -0x5c(%rbp),%eax
and    $0x7,%eax
mov    %eax,-0x5c(%rbp)
mov    -0x30(%rbp),%rax
movsbl 0x9(%rax),%eax
mov    -0x38(%rbp),%rcx
movsbl 0x9(%rcx),%ecx
xor    %ecx,%eax
cmp    $0x0,%eax
jge    11bf <remquol+0xbf>
xor    %eax,%eax
sub    -0x5c(%rbp),%eax
mov    %eax,-0x60(%rbp)
jmp    11c5 <remquol+0xc5>
mov    -0x5c(%rbp),%eax
mov    %eax,-0x60(%rbp)
mov    -0x60(%rbp),%ecx
mov    -0x28(%rbp),%rax
mov    %ecx,(%rax)
fldt   -0x50(%rbp)
pop    %rbp
ret

x86 assembly (clang, -O2):
<remquol>:
fldt   0x18(%rsp)
fldt   0x8(%rsp)
fstpt  -0x18(%rsp)
fstpt  -0x28(%rsp)
lea    -0x18(%rsp),%rax
lea    -0x28(%rsp),%rcx
fldt   -0x18(%rsp)
fldt   -0x28(%rsp)
fld    %st(1)
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
fprem1
fnstsw %ax
test   $0x400,%eax
jne    1130 <remquol+0x30>
fxch   %st(1)
fstpt  -0x38(%rsp)
mov    -0x30(%rsp),%edx
fxch   %st(1)
fstpt  -0x48(%rsp)
mov    %eax,%ecx
shr    $0xc,%ecx
and    $0xc,%ecx
shr    $0x4,%eax
and    $0x30,%eax
or     %ecx,%eax
movabs $0x7575313164642020,%rsi
31 75 75
mov    %eax,%ecx
shr    %cl,%rsi
and    $0x7,%esi
xor    -0x40(%rsp),%edx
movswq %dx,%rax
mov    %esi,%ecx
neg    %ecx
test   %rax,%rax
cmovns %esi,%ecx
mov    %ecx,(%rdi)
ret

LLVM IR (-O0):
define x86_fp80 @remquol(x86_fp80 %0, x86_fp80 %1, i32* %2) {
%4 = alloca x86_fp80
%5 = alloca x86_fp80
%6 = alloca i32*
%7 = alloca i8*
%8 = alloca i8*
%9 = alloca x86_fp80
%10 = alloca i32
%11 = alloca i8
%12 = alloca i32
store x86_fp80 %0, x86_fp80* %4
store x86_fp80 %1, x86_fp80* %5
store i32* %2, i32** %6
%13 = bitcast x86_fp80* %4 to i8*
store i8* %13, i8** %7
%14 = bitcast x86_fp80* %5 to i8*
store i8* %14, i8** %8
%15 = load i8*, i8** %7
%16 = load i8*, i8** %8
%17 = load x86_fp80, x86_fp80* %4
store x86_fp80 %17, x86_fp80* %9
br label %18
18: ; preds = %24, %3
%19 = load x86_fp80, x86_fp80* %9
%20 = load x86_fp80, x86_fp80* %5
%21 = call { x86_fp80, i32 } asm "fprem1; fnstsw %ax", "={st},={ax},{st(1)},0,~{dirflag},~{fpsr},~{flags}"(x86_fp80 %20, x86_fp80 %19)
%22 = extractvalue { x86_fp80, i32 } %21, 0
%23 = extractvalue { x86_fp80, i32 } %21, 1
store x86_fp80 %22, x86_fp80* %9
store i32 %23, i32* %10
br label %24
24: ; preds = %18
%25 = load i32, i32* %10
%26 = and i32 %25, 1024
%27 = icmp ne i32 %26, 0
br i1 %27, label %18, label %28
28: ; preds = %24
%29 = load i32, i32* %10
%30 = lshr i32 %29, 8
%31 = trunc i32 %30 to i8
store i8 %31, i8* %11
%32 = load i8, i8* %11
%33 = zext i8 %32 to i32
%34 = ashr i32 %33, 4
%35 = load i8, i8* %11
%36 = zext i8 %35 to i32
%37 = shl i32 %36, 4
%38 = or i32 %34, %37
%39 = trunc i32 %38 to i8
store i8 %39, i8* %11
%40 = load i8, i8* %11
%41 = zext i8 %40 to i32
%42 = and i32 %41, 60
%43 = zext i32 %42 to i64
%44 = ashr i64 8463725162920157216, %43
%45 = trunc i64 %44 to i32
store i32 %45, i32* %12
%46 = load i32, i32* %12
%47 = and i32 %46, 7
store i32 %47, i32* %12
%48 = load i8*, i8** %7
%49 = getelementptr inbounds i8, i8* %48, i64 9
%50 = load i8, i8* %49
%51 = sext i8 %50 to i32
%52 = load i8*, i8** %8
%53 = getelementptr inbounds i8, i8* %52, i64 9
%54 = load i8, i8* %53
%55 = sext i8 %54 to i32
%56 = xor i32 %51, %55
%57 = icmp slt i32 %56, 0
br i1 %57, label %58, label %61
58: ; preds = %28
%59 = load i32, i32* %12
%60 = sub i32 0, %59
br label %63
61: ; preds = %28
%62 = load i32, i32* %12
br label %63
63: ; preds = %61, %58
%64 = phi i32 [ %60, %58 ], [ %62, %61 ]
%65 = load i32*, i32** %6
store i32 %64, i32* %65
%66 = load x86_fp80, x86_fp80* %9
ret x86_fp80 %66
}

LLVM IR (-O2):
define x86_fp80 @remquol(x86_fp80 %0, x86_fp80 %1, i32* nocapture writeonly %2) {
%4 = alloca x86_fp80
%5 = alloca x86_fp80
store x86_fp80 %0, x86_fp80* %4
store x86_fp80 %1, x86_fp80* %5
%6 = bitcast x86_fp80* %4 to i8*
%7 = bitcast x86_fp80* %5 to i8*
%8 = load x86_fp80, x86_fp80* %4
%9 = load x86_fp80, x86_fp80* %5
br label %10
10: ; preds = %10, %3
%11 = phi x86_fp80 [ %8, %3 ], [ %13, %10 ]
%12 = call { x86_fp80, i32 } asm "fprem1; fnstsw %ax", "={st},={ax},{st(1)},0,~{dirflag},~{fpsr},~{flags}"(x86_fp80 %9, x86_fp80 %11)
%13 = extractvalue { x86_fp80, i32 } %12, 0
%14 = extractvalue { x86_fp80, i32 } %12, 1
%15 = and i32 %14, 1024
%16 = icmp eq i32 %15, 0
br i1 %16, label %17, label %10
17: ; preds = %10
%18 = extractvalue { x86_fp80, i32 } %12, 0
%19 = extractvalue { x86_fp80, i32 } %12, 1
%20 = bitcast x86_fp80 %9 to i80
%21 = bitcast x86_fp80 %8 to i80
%22 = lshr i32 %19, 12
%23 = and i32 %22, 12
%24 = lshr i32 %19, 4
%25 = and i32 %24, 48
%26 = or i32 %23, %25
%27 = zext i32 %26 to i64
%28 = lshr i64 8463725162920157216, %27
%29 = trunc i64 %28 to i32
%30 = and i32 %29, 7
%31 = xor i80 %20, %21
%32 = icmp slt i80 %31, 0
%33 = sub nsw i32 0, %30
%34 = select i1 %32, i32 %33, i32 %30
store i32 %34, i32* %2
ret x86_fp80 %18
}