Home | History | Annotate | Line # | Download | only in gen
fpsetsticky.S revision 1.2 
      1  1.2  thorpej /*	$NetBSD: fpsetsticky.S,v 1.2 2002/01/13 21:45:52 thorpej Exp $	*/
      2  1.1     fvdl 
      3  1.1     fvdl /*
      4  1.1     fvdl  * Written by Charles M. Hannum, Apr 9, 1995
      5  1.1     fvdl  * Public domain.
      6  1.1     fvdl  */
      7  1.1     fvdl 
      8  1.1     fvdl #include <machine/asm.h>
      9  1.1     fvdl 
     10  1.2  thorpej #ifdef WEAK_ALIAS
     11  1.2  thorpej WEAK_ALIAS(fpsetsticky, _fpsetsticky)
     12  1.2  thorpej ENTRY(_fpsetsticky)
     13  1.2  thorpej #else
     14  1.1     fvdl ENTRY(fpsetsticky)
     15  1.2  thorpej #endif
     16  1.1     fvdl 	fnstenv -28(%rsp)
     17  1.1     fvdl 	movl -24(%rsp),%eax
     18  1.1     fvdl 	movl %eax,%edx
     19  1.1     fvdl 
     20  1.1     fvdl 	andl $63,%eax
     21  1.1     fvdl 
     22  1.1     fvdl 	subl %eax,%edx
     23  1.1     fvdl 	andl $63,%edi
     24  1.1     fvdl 	addl %edi,%edx
     25  1.1     fvdl 	movl %edx,-24(%rsp)
     26  1.1     fvdl 	fldenv -28(%rsp)
     27  1.1     fvdl 	ret
     28