Home | History | Annotate | Line # | Download | only in gen
fpgetsticky.c revision 1.5.44.1
      1  1.5.44.1      yamt /*	$NetBSD: fpgetsticky.c,v 1.5.44.1 2012/04/17 00:05:14 yamt Exp $	*/
      2       1.2  jonathan 
      3       1.1       jtc /*
      4       1.1       jtc  * Written by J.T. Conklin, Apr 11, 1995
      5       1.1       jtc  * Public domain.
      6       1.1       jtc  */
      7       1.1       jtc 
      8       1.3   thorpej #include <sys/cdefs.h>
      9       1.4     lukem #if defined(LIBC_SCCS) && !defined(lint)
     10  1.5.44.1      yamt __RCSID("$NetBSD: fpgetsticky.c,v 1.5.44.1 2012/04/17 00:05:14 yamt Exp $");
     11       1.4     lukem #endif /* LIBC_SCCS and not lint */
     12       1.3   thorpej 
     13       1.3   thorpej #include "namespace.h"
     14       1.3   thorpej 
     15       1.1       jtc #include <ieeefp.h>
     16       1.3   thorpej 
     17       1.3   thorpej #ifdef __weak_alias
     18       1.3   thorpej __weak_alias(fpgetsticky,_fpgetsticky)
     19       1.3   thorpej #endif
     20       1.1       jtc 
     21       1.1       jtc fp_except
     22  1.5.44.1      yamt fpgetsticky(void)
     23       1.1       jtc {
     24  1.5.44.1      yamt 	fp_except x;
     25       1.1       jtc 
     26       1.5     perry 	__asm("cfc1 %0,$31" : "=r" (x));
     27       1.1       jtc 	return (x >> 2) & 0x1f;
     28       1.1       jtc }
     29