Home | History | Annotate | Line # | Download | only in gen 
      1 /*	$NetBSD: flt_rounds.c,v 1.6 2012/06/24 15:26:02 christos Exp $	*/
      2 
      3 /*
      4  * Written by J.T. Conklin, Apr 10, 1995
      5  * Public domain.
      6  */
      7 
      8 #include <sys/cdefs.h>
      9 #if defined(LIBC_SCCS) && !defined(lint)
     10 __RCSID("$NetBSD: flt_rounds.c,v 1.6 2012/06/24 15:26:02 christos Exp $");
     11 #endif /* LIBC_SCCS and not lint */
     12 
     13 #include <sys/types.h>
     14 #include <machine/float.h>
     15 
     16 static const int map[] = {
     17 	1,	/* round to nearest */
     18 	0,	/* round to zero */
     19 	2,	/* round to positive infinity */
     20 	3	/* round to negative infinity */
     21 };
     22 
     23 int
     24 __flt_rounds(void)
     25 {
     26 	uint32_t x;
     27 
     28 	__asm("st %%fsr,%0" : "=m" (*&x));
     29 	return map[(x >> 30) & 0x03];
     30 }
     31