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
21fp_except
22fpsetsticky(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