lib/msun/i387/e_remainderf.S

   1 /*
   2  * Written by J.T. Conklin <jtc@netbsd.org>.
   3  * Public domain.
   4  */
   5
   6 #include <machine/asm.h>
   7 /* RCSID("$NetBSD: e_remainderf.S,v 1.2 1995/05/08 23:49:47 jtc Exp $") */
   8
   9 ENTRY(remainderf)
  10         flds    8(%esp)
  11         flds    4(%esp)
  12 1:      fprem1
  13         fstsw   %ax
  14         sahf
  15         jp      1b
  16         fstp    %st(1)
  17         ret
  18 END(remainderf)
  19
  20         .section .note.GNU-stack,"",%progbits