@@ -90,7 +90,7 @@ tests = test-matherr test-fenv atest-exp atest-sincos atest-exp2 basic-test \
test-misc test-fpucw test-fpucw-ieee tst-definitions test-tgmath \
test-tgmath-ret bug-nextafter bug-nexttoward bug-tgmath1 \
test-tgmath-int test-tgmath2 test-powl tst-CMPLX tst-CMPLX2 test-snan \
- test-fenv-tls test-fenv-preserve $(tests-static)
+ test-fenv-tls test-fenv-preserve test-fenv-return $(tests-static)
tests-static = test-fpucw-static test-fpucw-ieee-static
# We do the `long double' tests only if this data type is available and
# distinct from `double'.
new file mode 100644
@@ -0,0 +1,147 @@
+/* Test fegetenv preserves exception mask (bug 16198).
+ Copyright (C) 2014 Free Software Foundation, Inc.
+ This file is part of the GNU C Library.
+
+ The GNU C Library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Lesser General Public
+ License as published by the Free Software Foundation; either
+ version 2.1 of the License, or (at your option) any later version.
+
+ The GNU C Library is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ Lesser General Public License for more details.
+
+ You should have received a copy of the GNU Lesser General Public
+ License along with the GNU C Library; if not, see
+ <http://www.gnu.org/licenses/>. */
+
+#include <fenv.h>
+#include <stdio.h>
+#include <math-tests.h>
+
+static int count_errors;
+
+static void
+test_feenableexcept (void)
+{
+#if defined FE_ALL_EXCEPT
+ int res;
+
+ fedisableexcept (FE_ALL_EXCEPT);
+
+ res = feenableexcept (FE_ALL_EXCEPT);
+
+ if (!EXCEPTION_ENABLE_SUPPORTED (FE_ALL_EXCEPT))
+ {
+ if (res == -1)
+ {
+ puts ("feenableexcept (FE_ALL_EXCEPT) not supported, cannot test.");
+ return;
+ }
+ else
+ {
+ printf ("feenableexcept incorrect return value %d\n", res);
+ count_errors++;
+ }
+ }
+ else if (res != 0)
+ {
+ puts ("feenableexcept (FE_ALL_EXCEPT) failed");
+ count_errors++;
+ }
+
+ if (fegetexcept () != FE_ALL_EXCEPT)
+ {
+ puts ("feenableexcept did not set all exceptions");
+ count_errors++;
+ }
+#endif
+}
+
+static void
+test_fesetenv (void)
+{
+#if defined FE_NOMASK_ENV && defined FE_ALL_EXCEPT
+ int res;
+
+ fedisableexcept (FE_ALL_EXCEPT);
+
+ res = fesetenv (FE_NOMASK_ENV);
+
+ if (!EXCEPTION_ENABLE_SUPPORTED (FE_ALL_EXCEPT))
+ {
+ if (res != 0)
+ {
+ puts ("fesetenv (FE_NOMASK_ENV) not supported, cannot test.");
+ return;
+ }
+ else
+ {
+ printf ("fesetenv incorrect return value %d\n", res);
+ count_errors++;
+ }
+ }
+ else if (res != 0)
+ {
+ puts ("fesetenv (FE_NOMASK_ENV) failed");
+ count_errors++;
+ }
+
+ if (fegetexcept () != FE_ALL_EXCEPT)
+ {
+ puts ("fesetenv did not set all exceptions");
+ count_errors++;
+ }
+#endif
+}
+
+static void
+test_feupdateenv (void)
+{
+#if defined FE_NOMASK_ENV && defined FE_ALL_EXCEPT
+ int res;
+
+ fedisableexcept (FE_ALL_EXCEPT);
+
+ res = feupdateenv (FE_NOMASK_ENV);
+
+ if (!EXCEPTION_ENABLE_SUPPORTED (FE_ALL_EXCEPT))
+ {
+ if (res != 0)
+ {
+ puts ("feupdateenv (FE_NOMASK_ENV)) not supported, cannot test.");
+ return;
+ }
+ else
+ {
+ printf ("feupdateenv incorrect return value %d\n", res);
+ count_errors++;
+ }
+ }
+ else if (res != 0)
+ {
+ puts ("feupdateenv (FE_NOMASK_ENV) failed");
+ count_errors++;
+ }
+
+ if (fegetexcept () != FE_ALL_EXCEPT)
+ {
+ puts ("feupdateenv did not set all exceptions");
+ count_errors++;
+ }
+#endif
+}
+
+static int
+do_test (void)
+{
+ test_feenableexcept ();
+ test_fesetenv ();
+ test_feupdateenv ();
+
+ return count_errors != 0 ? 1 : 0;
+}
+
+#define TEST_FUNCTION do_test ()
+#include "../test-skeleton.c"