summaryrefslogtreecommitdiffstats
path: root/lib/libc/sparc64/gen/fpsetsticky.c
diff options
context:
space:
mode:
Diffstat (limited to 'lib/libc/sparc64/gen/fpsetsticky.c')
-rw-r--r--lib/libc/sparc64/gen/fpsetsticky.c30
1 files changed, 30 insertions, 0 deletions
diff --git a/lib/libc/sparc64/gen/fpsetsticky.c b/lib/libc/sparc64/gen/fpsetsticky.c
new file mode 100644
index 0000000..61d3d1b
--- /dev/null
+++ b/lib/libc/sparc64/gen/fpsetsticky.c
@@ -0,0 +1,30 @@
+/* $NetBSD: fpsetsticky.c,v 1.2 2002/01/13 21:45:51 thorpej Exp $ */
+
+/*
+ * Written by J.T. Conklin, Apr 10, 1995
+ * Public domain.
+ */
+
+#include <sys/cdefs.h>
+__FBSDID("$FreeBSD$");
+
+#include <machine/fsr.h>
+#include <ieeefp.h>
+
+fp_except_t
+fpsetsticky(sticky)
+ fp_except_t sticky;
+{
+ unsigned int old;
+ unsigned int new;
+
+ __asm__("st %%fsr,%0" : "=m" (old));
+
+ new = old;
+ new &= ~FSR_AEXC_MASK;
+ new |= FSR_AEXC(sticky & FSR_EXC_MASK);
+
+ __asm__("ld %0,%%fsr" : : "m" (new));
+
+ return (FSR_GET_AEXC(old));
+}
OpenPOWER on IntegriCloud