1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
|
#ifndef _FENV_H
#include <math/fenv.h>
#ifndef _ISOMAC
# include <stdbool.h>
/* Now define the internal interfaces. */
extern int __feclearexcept (int __excepts);
extern int __fegetexcept (void);
extern int __fegetexceptflag (fexcept_t *__flagp, int __excepts);
extern int __feraiseexcept (int __excepts);
extern int __fesetexceptflag (const fexcept_t *__flagp, int __excepts);
extern int __fegetenv (fenv_t *__envp);
extern int __fesetenv (const fenv_t *__envp);
extern int __feupdateenv (const fenv_t *__envp);
extern __typeof (fegetround) __fegetround __attribute_pure__;
extern __typeof (feholdexcept) __feholdexcept;
extern __typeof (fesetround) __fesetround;
libm_hidden_proto (feraiseexcept)
libm_hidden_proto (__feraiseexcept)
libm_hidden_proto (fegetenv)
libm_hidden_proto (__fegetenv)
libm_hidden_proto (fegetround)
libm_hidden_proto (__fegetround)
libm_hidden_proto (fesetenv)
libm_hidden_proto (__fesetenv)
libm_hidden_proto (fesetround)
libm_hidden_proto (__fesetround)
libm_hidden_proto (feholdexcept)
libm_hidden_proto (__feholdexcept)
libm_hidden_proto (feupdateenv)
libm_hidden_proto (__feupdateenv)
libm_hidden_proto (fetestexcept)
libm_hidden_proto (feclearexcept)
/* Rounding mode context. This allows functions to set/restore rounding mode
only when the desired rounding mode is different from the current rounding
mode. */
struct rm_ctx
{
fenv_t env;
bool updated_status;
};
/* Track whether rounding mode macros were defined, since
get-rounding-mode.h may define default versions if they weren't.
FE_TONEAREST must always be defined (even if no changes of rounding
mode are supported, glibc requires it to be defined to represent
the default rounding mode). */
# ifndef FE_TONEAREST
# error "FE_TONEAREST not defined"
# endif
# if defined FE_DOWNWARD || defined FE_TOWARDZERO || defined FE_UPWARD
# define FE_HAVE_ROUNDING_MODES 1
# else
# define FE_HAVE_ROUNDING_MODES 0
# endif
/* When no floating-point exceptions are defined in <fenv.h>, make
feraiseexcept ignore its argument so that unconditional
feraiseexcept calls do not cause errors for undefined exceptions.
Define it to expand to a void expression so that any calls testing
the result of feraiseexcept do produce errors. */
# if FE_ALL_EXCEPT == 0
# define feraiseexcept(excepts) ((void) 0)
# define __feraiseexcept(excepts) ((void) 0)
# endif
/* Similarly, most <fenv.h> functions have trivial implementations in
the absence of support for floating-point exceptions and rounding
modes. */
# if !FE_HAVE_ROUNDING_MODES
# if FE_ALL_EXCEPT == 0
extern inline int
fegetenv (fenv_t *__e)
{
return 0;
}
extern inline int
__fegetenv (fenv_t *__e)
{
return 0;
}
extern inline int
feholdexcept (fenv_t *__e)
{
return 0;
}
extern inline int
__feholdexcept (fenv_t *__e)
{
return 0;
}
extern inline int
fesetenv (const fenv_t *__e)
{
return 0;
}
extern inline int
__fesetenv (const fenv_t *__e)
{
return 0;
}
extern inline int
feupdateenv (const fenv_t *__e)
{
return 0;
}
extern inline int
__feupdateenv (const fenv_t *__e)
{
return 0;
}
# endif
extern inline int
fegetround (void)
{
return FE_TONEAREST;
}
extern inline int
__fegetround (void)
{
return FE_TONEAREST;
}
extern inline int
fesetround (int __d)
{
return 0;
}
extern inline int
__fesetround (int __d)
{
return 0;
}
# endif
#endif
#endif
|
