kernel: scheduling fix for ARM
[minix.git] / lib / libc / arch / sparc / gen / fpsetsticky.c
blobd0706902fac70b941a98e98ab4508b8ff326a3b7
1 /* $NetBSD: fpsetsticky.c,v 1.5 2005/12/24 23:10:08 perry Exp $ */
3 /*
4 * Written by J.T. Conklin, Apr 10, 1995
5 * Public domain.
6 */
8 #include <sys/cdefs.h>
9 #if defined(LIBC_SCCS) && !defined(lint)
10 __RCSID("$NetBSD: fpsetsticky.c,v 1.5 2005/12/24 23:10:08 perry Exp $");
11 #endif /* LIBC_SCCS and not lint */
13 #include "namespace.h"
15 #include <ieeefp.h>
17 #ifdef __weak_alias
18 __weak_alias(fpsetsticky,_fpsetsticky)
19 #endif
21 fp_except
22 fpsetsticky(sticky)
23 fp_except sticky;
25 fp_except old;
26 fp_except new;
28 __asm("st %%fsr,%0" : "=m" (*&old));
30 new = old;
31 new &= ~(0x1f << 5);
32 new |= ((sticky & 0x1f) << 5);
34 __asm("ld %0,%%fsr" : : "m" (*&new));
36 return (old >> 5) & 0x1f;