]>
Commit | Line | Data |
---|---|---|
0570cfed | 1 | /* Test return value when setting FE_NOMASK_ENV (BZ16918, BZ17009). |
d614a753 | 2 | Copyright (C) 2014-2020 Free Software Foundation, Inc. |
0570cfed W |
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 | |
5a82c748 | 17 | <https://www.gnu.org/licenses/>. */ |
0570cfed W |
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 ("feenableexcept (FE_ALL_EXCEPT) not supported, cannot test."); | |
38 | return; | |
39 | } | |
40 | else if (res != 0) | |
41 | { | |
42 | puts ("feenableexcept (FE_ALL_EXCEPT) failed"); | |
43 | count_errors++; | |
44 | } | |
45 | ||
46 | if (fegetexcept () != FE_ALL_EXCEPT) | |
47 | { | |
48 | puts ("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 ("fesetenv (FE_NOMASK_ENV) not supported, cannot test."); | |
67 | return; | |
68 | } | |
69 | else if (res != 0) | |
70 | { | |
71 | puts ("fesetenv (FE_NOMASK_ENV) failed"); | |
72 | count_errors++; | |
73 | } | |
74 | ||
75 | if (fegetexcept () != FE_ALL_EXCEPT) | |
76 | { | |
77 | puts ("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 ("feupdateenv (FE_NOMASK_ENV)) not supported, cannot test."); | |
96 | return; | |
97 | } | |
98 | else if (res != 0) | |
99 | { | |
100 | puts ("feupdateenv (FE_NOMASK_ENV) failed"); | |
101 | count_errors++; | |
102 | } | |
103 | ||
104 | if (fegetexcept () != FE_ALL_EXCEPT) | |
105 | { | |
106 | puts ("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" |