xref: /minix/lib/libc/arch/mips/gen/fpgetsticky.c (revision 0a6a1f1d)
1 /*	$NetBSD: fpgetsticky.c,v 1.9 2014/09/17 11:02:55 joerg Exp $	*/
2 
3 /*
4  * Written by J.T. Conklin, Apr 11, 1995
5  * Public domain.
6  */
7 
8 #include <sys/cdefs.h>
9 #if defined(LIBC_SCCS) && !defined(lint)
10 __RCSID("$NetBSD: fpgetsticky.c,v 1.9 2014/09/17 11:02:55 joerg Exp $");
11 #endif /* LIBC_SCCS and not lint */
12 
13 #include "namespace.h"
14 
15 #include <ieeefp.h>
16 
17 #ifdef __weak_alias
__weak_alias(fpgetsticky,_fpgetsticky)18 __weak_alias(fpgetsticky,_fpgetsticky)
19 #endif
20 
21 fp_except
22 fpgetsticky(void)
23 {
24 	fp_except x;
25 
26 	__asm(".set push; .set noat; cfc1 %0,$31; .set pop" : "=r" (x));
27 	return (x >> 2) & 0x1f;
28 }
29