Cross Reference: /src/lib/libm/arch/i387/e_remainder.S

e_remainder.S revision 1.3

      1 /*
      2  * Written by J.T. Conklin <jtc (at) netbsd.org>.
      3  * Public domain.
      4  */
      5 
      6 #include <machine/asm.h>
      7 
      8 RCSID("$Id: e_remainder.S,v 1.3 1995/04/28 22:43:45 jtc Exp $")
      9 
     10 ENTRY(__ieee754_remainder)
     11 	fldl	12(%esp)
     12 	fldl	4(%esp)
     13 1:	fprem1
     14 	fstsw	%ax
     15 	sahf
     16 	jp	1b
     17 	fstpl	%st(1)
     18 	ret
     19