Home | History | Annotate | Line # | Download | only in gen 
      1 /*	$NetBSD: fpsetsticky.c,v 1.10 2017/02/27 06:55:26 chs 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: fpsetsticky.c,v 1.10 2017/02/27 06:55:26 chs Exp $");
     11 #endif /* LIBC_SCCS and not lint */
     12 
     13 #include "namespace.h"
     14 
     15 #include <ieeefp.h>
     16 
     17 #ifdef __weak_alias
     18 __weak_alias(fpsetsticky,_fpsetsticky)
     19 #endif
     20 
     21 fp_except
     22 fpsetsticky(fp_except sticky)
     23 {
     24 	fp_except old;
     25 	fp_except new;
     26 
     27 	__asm(".set push; .set noat; cfc1 %0,$31; .set pop" : "=r" (old));
     28 
     29 	new = old & ~(0x1f << 2);
     30 	new |= (sticky & 0x1f) << 2;
     31 
     32 	__asm(".set push; .set noat; ctc1 %0,$31; .set pop" : : "r" (new));
     33 
     34 	return (old >> 2) & 0x1f;
     35 }
     36