summaryrefslogtreecommitdiffstats
path: root/winsup/mingw/mingwex/feholdexcept.c
diff options
context:
space:
mode:
authorDanny Smith <dannysmith@users.sourceforge.net>2002-06-13 10:20:48 +0000
committerDanny Smith <dannysmith@users.sourceforge.net>2002-06-13 10:20:48 +0000
commitdc8971488e7c174ab4084cbdb0a8f12c39b738d7 (patch)
treed679387fa379b6d5feb9756bdd7237347614453b /winsup/mingw/mingwex/feholdexcept.c
parent5f74ae83e5fba1ceb73a8d822cbe2b48c619127f (diff)
downloadcygnal-dc8971488e7c174ab4084cbdb0a8f12c39b738d7.tar.gz
cygnal-dc8971488e7c174ab4084cbdb0a8f12c39b738d7.tar.bz2
cygnal-dc8971488e7c174ab4084cbdb0a8f12c39b738d7.zip
* include/_mingw.h: Increment version to 2.0.
* Makefile.in: Ditto. Merge in mingwex branch.
Diffstat (limited to 'winsup/mingw/mingwex/feholdexcept.c')
-rw-r--r--winsup/mingw/mingwex/feholdexcept.c18
1 files changed, 18 insertions, 0 deletions
diff --git a/winsup/mingw/mingwex/feholdexcept.c b/winsup/mingw/mingwex/feholdexcept.c
new file mode 100644
index 000000000..df486afb3
--- /dev/null
+++ b/winsup/mingw/mingwex/feholdexcept.c
@@ -0,0 +1,18 @@
+#include <fenv.h>
+
+/* 7.6.4.2
+ The feholdexcept function saves the current floating-point
+ environment in the object pointed to by envp, clears the exception
+ flags, and then installs a non-stop (continue on exceptions) mode,
+ if available, for all exceptions. */
+
+int feholdexcept (fenv_t * envp)
+{
+ fenv_t tmp_env;
+ __asm__ ("fnstenv %0;" : "=m" (* envp)); /* save current into envp */
+ tmp_env = * envp;
+ tmp_env.__status_word &= ~FE_ALL_EXCEPT; /* clear exception flags */
+ tmp_env.__control_word |= FE_ALL_EXCEPT; /* set cw to non-stop */
+ __asm__ volatile ("fldenv %0;" : : "m" (tmp_env)); /* install the copy */
+ return 0;
+}