fpsetmask.c revision 1.3 
1/*	$NetBSD: fpsetmask.c,v 1.3 2002/01/13 21:45:49 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
18fp_except
19fpsetmask(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