Home | History | Annotate | Line # | Download | only in gen
fpsetmask.c revision 1.2 
      1 /*	$NetBSD: fpsetmask.c,v 1.2 2002/01/13 21:45:50 thorpej Exp $	*/
      2 
      3 /*
      4  * Written by J.T. Conklin, Apr 10, 1995
      5  * Public domain.
      6  */
      7 
      8 #include <sys/cdefs.h>
      9 
     10 #include "namespace.h"
     11 
     12 #include <ieeefp.h>
     13 
     14 #ifdef __weak_alias
     15 __weak_alias(fpsetmask,_fpsetmask)
     16 #endif
     17 
     18 fp_except
     19 fpsetmask(mask)
     20 	fp_except mask;
     21 {
     22 	fp_except old;
     23 	fp_except new;
     24 
     25 	__asm__("st %%fsr,%0" : "=m" (*&old));
     26 
     27 	new = old;
     28 	new &= ~(0x1f << 23);
     29 	new |= ((mask & 0x1f) << 23);
     30 
     31 	__asm__("ld %0,%%fsr" : : "m" (*&new));
     32 
     33 	return (old >> 23) & 0x1f;
     34 }
     35