summaryrefslogtreecommitdiff
path: root/lib/libc/arch/ns32k/gen/fpsetround.c
diff options
context:
space:
mode:
Diffstat (limited to 'lib/libc/arch/ns32k/gen/fpsetround.c')
-rw-r--r--lib/libc/arch/ns32k/gen/fpsetround.c24
1 files changed, 24 insertions, 0 deletions
diff --git a/lib/libc/arch/ns32k/gen/fpsetround.c b/lib/libc/arch/ns32k/gen/fpsetround.c
new file mode 100644
index 00000000000..e3d7fa98218
--- /dev/null
+++ b/lib/libc/arch/ns32k/gen/fpsetround.c
@@ -0,0 +1,24 @@
+/*
+ * Written by J.T. Conklin, Apr 28, 1995
+ * Public domain.
+ */
+
+#include <ieeefp.h>
+
+fp_rnd
+fpsetround(rnd_dir)
+ fp_rnd rnd_dir;
+{
+ fp_rnd old;
+ fp_rnd new;
+
+ __asm__("sfsr %0" : "=r" (old));
+
+ new = old;
+ new &= ~(0x03 << 7);
+ new |= ((rnd_dir & 0x03) << 7);
+
+ __asm__("lfsr %0" : : "r" (new));
+
+ return (old >> 7) & 0x03;
+}