aboutsummaryrefslogtreecommitdiff
path: root/sysdeps/sparc/fpu
diff options
context:
space:
mode:
authorDavid S. Miller <davem@davemloft.net>2012-03-16 03:05:49 -0700
committerDavid S. Miller <davem@davemloft.net>2012-03-16 03:05:49 -0700
commitdd7f470327139a88019b2c5ded8fc2811b0fed00 (patch)
treea705d6cc32173d981fd73fc776d2a9ced2d78cab /sysdeps/sparc/fpu
parente6a62e18fd9d429950e25db97ac216fa570bfa30 (diff)
downloadglibc-dd7f470327139a88019b2c5ded8fc2811b0fed00.zip
glibc-dd7f470327139a88019b2c5ded8fc2811b0fed00.tar.gz
glibc-dd7f470327139a88019b2c5ded8fc2811b0fed00.tar.bz2
Implement optimized libc_fe*() math routines on sparc.
* sysdeps/sparc/fpu/math_private.h: New file.
Diffstat (limited to 'sysdeps/sparc/fpu')
-rw-r--r--sysdeps/sparc/fpu/math_private.h68
1 files changed, 68 insertions, 0 deletions
diff --git a/sysdeps/sparc/fpu/math_private.h b/sysdeps/sparc/fpu/math_private.h
new file mode 100644
index 0000000..05ef623
--- /dev/null
+++ b/sysdeps/sparc/fpu/math_private.h
@@ -0,0 +1,68 @@
+#ifndef SPARC_MATH_PRIVATE_H
+#define SPARC_MATH_PRIVATE_H 1
+
+#include_next <math_private.h>
+#include <fenv.h>
+
+#undef libc_feholdexcept
+#define libc_feholdexcept(e) \
+ do { \
+ fenv_t etmp; \
+ __fenv_stfsr(etmp); \
+ *(e) = etmp; \
+ etmp = etmp & ~((0x1f << 23) | FE_ALL_EXCEPT); \
+ __fenv_ldfsr(etmp); \
+ } while (0)
+#undef libc_feholdexceptf
+#define libc_feholdexceptf(e) libc_feholdexcept (e)
+#undef libc_feholdexceptl
+#define libc_feholdexceptl(e) libc_feholdexcept (e)
+
+#undef libc_feholdexcept_setround
+#define libc_feholdexcept_setround(e, r) \
+ do { \
+ fenv_t etmp; \
+ __fenv_stfsr(etmp); \
+ *(e) = etmp; \
+ etmp = etmp & ~((0x1f << 23) | FE_ALL_EXCEPT); \
+ etmp = (etmp & ~__FE_ROUND_MASK) | (r); \
+ __fenv_ldfsr(etmp); \
+ } while (0)
+#undef libc_feholdexcept_setroundf
+#define libc_feholdexcept_setroundf(e, r) libc_feholdexcept_setround (e, r)
+#undef libc_feholdexcept_setroundl
+#define libc_feholdexcept_setroundl(e, r) libc_feholdexcept_setround (e, r)
+
+#undef libc_fetestexcept
+#define libc_fetestexcept(e) \
+ ({ \
+ fenv_t etmp; \
+ __fenv_stfsr(etmp); \
+ etmp & (e) & FE_ALL_EXCEPT; })
+#undef libc_fetestexceptf
+#define libc_fetestexceptf(e) libc_fetestexcept (e)
+#undef libc_fetestexceptl
+#define libc_fetestexceptl(e) libc_fetestexcept (e)
+
+#undef libc_fesetenv
+#define libc_fesetenv(e) \
+ __fenv_ldfsr(*e)
+#undef libc_fesetenvf
+#define libc_fesetenvf(e) libc_fesetenv (e)
+#undef libc_fesetenvl
+#define libc_fesetenvl(e) libc_fesetenv (e)
+
+#undef libc_feupdateenv
+#define libc_feupdateenv(e) \
+ do { \
+ fenv_t etmp; \
+ __fenv_stfsr(etmp); \
+ __fenv_ldfsr(*e); \
+ __feraiseexcept (etmp & FE_ALL_EXCEPT); \
+ } while (0)
+#undef libc_feupdateenvf
+#define libc_feupdateenvf(e) libc_feupdateenv (e)
+#undef libc_feupdateenvl
+#define libc_feupdateenvl(e) libc_feupdateenv (e)
+
+#endif /* SPARC_MATH_PRIVATE_H */