Welcome to mirror list, hosted at ThFree Co, Russian Federation.

cygwin.com/git/newlib-cygwin.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'winsup/mingw/mingwex/feupdateenv.c')
-rw-r--r--winsup/mingw/mingwex/feupdateenv.c20
1 files changed, 20 insertions, 0 deletions
diff --git a/winsup/mingw/mingwex/feupdateenv.c b/winsup/mingw/mingwex/feupdateenv.c
new file mode 100644
index 000000000..f414837f5
--- /dev/null
+++ b/winsup/mingw/mingwex/feupdateenv.c
@@ -0,0 +1,20 @@
+#include <fenv.h>
+
+/* 7.6.4.4
+ The feupdateenv function saves the currently raised exceptions in
+ its automatic storage, installs the floating-point environment
+ represented by the object pointed to by envp, and then raises the
+ saved exceptions. The argument envp shall point to an object
+ set by a call to feholdexcept or fegetenv, or equal the macro
+ FE_DFL_ENV or an implementation-defined environment macro. */
+
+/* FIXME: this works but surely there must be a better way. */
+
+int feupdateenv (const fenv_t * envp)
+{
+ unsigned int _fexcept = fetestexcept (FE_ALL_EXCEPT); /*save excepts */
+ fesetenv (envp); /* install the env */
+ feraiseexcept (_fexcept); /* raise the execept */
+ return 0;
+}
+