/* $NetBSD: fpsetsticky.c,v 1.6 2013/10/18 02:19:12 mrg Exp $ */ /* * Written by J.T. Conklin, Apr 10, 1995 * Public domain. */ #include <sys/cdefs.h> #if defined(LIBC_SCCS) && !defined(lint) __RCSID("$NetBSD: fpsetsticky.c,v 1.6 2013/10/18 02:19:12 mrg Exp $"); #endif /* LIBC_SCCS and not lint */ #include "namespace.h" #include <ieeefp.h> #ifdef __weak_alias __weak_alias(fpsetsticky,_fpsetsticky) #endif fp_except fpsetsticky(fp_except sticky) { fp_except old; fp_except new; __asm("st %%fsr,%0" : "=m" (*&old)); new = old; new &= ~(0x1f << 5); new |= ((sticky & 0x1f) << 5); __asm("ld %0,%%fsr" : : "m" (*&new)); return (old >> 5) & 0x1f; }