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