Home | History | Annotate | Line # | Download | only in gen
fpgetround.S revision 1.6.8.1 
      1  1.6.8.1       tls /*	$NetBSD: fpgetround.S,v 1.6.8.1 2014/08/20 00:02:10 tls Exp $	*/
      2      1.4     perry 
      3      1.1       jtc /*
      4      1.1       jtc  * Written by J.T. Conklin, Apr 4, 1995
      5      1.1       jtc  * Public domain.
      6      1.1       jtc  */
      7      1.1       jtc 
      8      1.1       jtc #include <machine/asm.h>
      9      1.1       jtc 
     10      1.6  christos /*
     11      1.6  christos  * XXX load only x87 state.
     12      1.6  christos  */
     13      1.6  christos 
     14      1.5   thorpej #ifdef WEAK_ALIAS
     15      1.5   thorpej WEAK_ALIAS(fpgetround, _fpgetround)
     16      1.5   thorpej ENTRY(_fpgetround)
     17      1.5   thorpej #else
     18      1.1       jtc ENTRY(fpgetround)
     19      1.5   thorpej #endif
     20      1.6  christos 	fnstcw -4(%esp)
     21      1.6  christos 	movl -4(%esp), %eax
     22      1.6  christos 	andl $0x00000c00, %eax
     23      1.1       jtc 	ret
     24  1.6.8.1       tls #ifdef WEAK_ALIAS
     25  1.6.8.1       tls END(_fpgetround)
     26  1.6.8.1       tls #else
     27  1.6.8.1       tls END(fpgetround)
     28  1.6.8.1       tls #endif
     29