fpsetmask.c revision 1.3 
1/*	$NetBSD: fpsetmask.c,v 1.3 2002/01/13 21:45:45 thorpej Exp $	*/
2
3/*
4 * Written by J.T. Conklin, Apr 11, 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__("cfc1 %0,$31" : "=r" (old));
26
27	new = old;
28	new &= ~(0x1f << 7);
29	new |= ((mask & 0x1f) << 7);
30
31	__asm__("ctc1 %0,$31" : : "r" (new));
32
33	return (old >> 7) & 0x1f;
34}
35