musl-tcc/src/math/x86_64/remainderl.c
2022-03-20 16:48:53 +08:00

10 lines
200 B
C

#include <math.h>
long double remainderl(long double x, long double y)
{
unsigned short fpsr;
do __asm__ ("fprem1; fnstsw %%ax" : "+t"(x), "=a"(fpsr) : "u"(y));
while (fpsr & 0x400);
return x;
}