1 | /* Test return value when setting FE_NOMASK_ENV (BZ16918, BZ17009). |
---|---|
2 | Copyright (C) 2014-2022 Free Software Foundation, Inc. |
3 | This file is part of the GNU C Library. |
4 | |
5 | The GNU C Library is free software; you can redistribute it and/or |
6 | modify it under the terms of the GNU Lesser General Public |
7 | License as published by the Free Software Foundation; either |
8 | version 2.1 of the License, or (at your option) any later version. |
9 | |
10 | The GNU C Library is distributed in the hope that it will be useful, |
11 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
13 | Lesser General Public License for more details. |
14 | |
15 | You should have received a copy of the GNU Lesser General Public |
16 | License along with the GNU C Library; if not, see |
17 | <https://www.gnu.org/licenses/>. */ |
18 | |
19 | #include <fenv.h> |
20 | #include <stdio.h> |
21 | #include <math-tests.h> |
22 | |
23 | static int count_errors; |
24 | |
25 | static void |
26 | test_feenableexcept (void) |
27 | { |
28 | #if defined FE_ALL_EXCEPT |
29 | int res; |
30 | |
31 | fedisableexcept (FE_ALL_EXCEPT); |
32 | |
33 | res = feenableexcept (FE_ALL_EXCEPT); |
34 | |
35 | if (!EXCEPTION_ENABLE_SUPPORTED (FE_ALL_EXCEPT) && (res == -1)) |
36 | { |
37 | puts (s: "feenableexcept (FE_ALL_EXCEPT) not supported, cannot test."); |
38 | return; |
39 | } |
40 | else if (res != 0) |
41 | { |
42 | puts (s: "feenableexcept (FE_ALL_EXCEPT) failed"); |
43 | count_errors++; |
44 | } |
45 | |
46 | if (fegetexcept () != FE_ALL_EXCEPT) |
47 | { |
48 | puts (s: "feenableexcept did not set all exceptions"); |
49 | count_errors++; |
50 | } |
51 | #endif |
52 | } |
53 | |
54 | static void |
55 | test_fesetenv (void) |
56 | { |
57 | #if defined FE_NOMASK_ENV && defined FE_ALL_EXCEPT |
58 | int res; |
59 | |
60 | fedisableexcept (FE_ALL_EXCEPT); |
61 | |
62 | res = fesetenv (FE_NOMASK_ENV); |
63 | |
64 | if (!EXCEPTION_ENABLE_SUPPORTED (FE_ALL_EXCEPT) && (res != 0)) |
65 | { |
66 | puts (s: "fesetenv (FE_NOMASK_ENV) not supported, cannot test."); |
67 | return; |
68 | } |
69 | else if (res != 0) |
70 | { |
71 | puts (s: "fesetenv (FE_NOMASK_ENV) failed"); |
72 | count_errors++; |
73 | } |
74 | |
75 | if (fegetexcept () != FE_ALL_EXCEPT) |
76 | { |
77 | puts (s: "fesetenv did not set all exceptions"); |
78 | count_errors++; |
79 | } |
80 | #endif |
81 | } |
82 | |
83 | static void |
84 | test_feupdateenv (void) |
85 | { |
86 | #if defined FE_NOMASK_ENV && defined FE_ALL_EXCEPT |
87 | int res; |
88 | |
89 | fedisableexcept (FE_ALL_EXCEPT); |
90 | |
91 | res = feupdateenv (FE_NOMASK_ENV); |
92 | |
93 | if (!EXCEPTION_ENABLE_SUPPORTED (FE_ALL_EXCEPT) && (res != 0)) |
94 | { |
95 | puts (s: "feupdateenv (FE_NOMASK_ENV)) not supported, cannot test."); |
96 | return; |
97 | } |
98 | else if (res != 0) |
99 | { |
100 | puts (s: "feupdateenv (FE_NOMASK_ENV) failed"); |
101 | count_errors++; |
102 | } |
103 | |
104 | if (fegetexcept () != FE_ALL_EXCEPT) |
105 | { |
106 | puts (s: "feupdateenv did not set all exceptions"); |
107 | count_errors++; |
108 | } |
109 | #endif |
110 | } |
111 | |
112 | static int |
113 | do_test (void) |
114 | { |
115 | test_feenableexcept (); |
116 | test_fesetenv (); |
117 | test_feupdateenv (); |
118 | |
119 | return count_errors != 0 ? 1 : 0; |
120 | } |
121 | |
122 | #define TEST_FUNCTION do_test () |
123 | #include "../test-skeleton.c" |
124 |