xref: /netbsd-src/lib/libc/arch/sparc/gen/fpsetmask.c (revision 76dfffe33547c37f8bdd446e3e4ab0f3c16cea4b)
1 /*
2  * Written by J.T. Conklin, Apr 10, 1995
3  * Public domain.
4  */
5 
6 #include <ieeefp.h>
7 
8 fp_except
9 fpsetmask(mask)
10 	fp_except mask;
11 {
12 	fp_except old;
13 	fp_except new;
14 
15 	__asm__("st %%fsr,%0" : "=m" (*&old));
16 
17 	new = old;
18 	new &= ~(0x1f << 23);
19 	new |= ((mask & 0x1f) << 23);
20 
21 	__asm__("ld %0,%%fsr" : : "m" (*&new));
22 
23 	return (old >> 23) & 0x1f;
24 }
25