sysdeps/i386/fpu/e_fmodl.c

   1 /*
   2  * Public domain.
   3  *
   4  */
   5
   6 #include <math_private.h>
   7 #include <libm-alias-finite.h>
   8
   9 long double
  10 __ieee754_fmodl (long double x, long double y)
  11 {
  12   long double res;
  13
  14   asm ("1:\tfprem\n"
  15        "fstsw   %%ax\n"
  16        "sahf\n"
  17        "jp      1b\n"
  18        "fstp    %%st(1)"
  19        : "=t" (res) : "0" (x), "u" (y) : "ax", "st(1)");
  20   return res;
  21 }
  22 libm_alias_finite (__ieee754_fmodl, __fmodl)