blob: 05ef623644a402d55ad4cde86ee5cf4096cebb60 (
plain) (
blame)
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
|
#ifndef SPARC_MATH_PRIVATE_H
#define SPARC_MATH_PRIVATE_H 1
#include_next <math_private.h>
#include <fenv.h>
#undef libc_feholdexcept
#define libc_feholdexcept(e) \
do { \
fenv_t etmp; \
__fenv_stfsr(etmp); \
*(e) = etmp; \
etmp = etmp & ~((0x1f << 23) | FE_ALL_EXCEPT); \
__fenv_ldfsr(etmp); \
} while (0)
#undef libc_feholdexceptf
#define libc_feholdexceptf(e) libc_feholdexcept (e)
#undef libc_feholdexceptl
#define libc_feholdexceptl(e) libc_feholdexcept (e)
#undef libc_feholdexcept_setround
#define libc_feholdexcept_setround(e, r) \
do { \
fenv_t etmp; \
__fenv_stfsr(etmp); \
*(e) = etmp; \
etmp = etmp & ~((0x1f << 23) | FE_ALL_EXCEPT); \
etmp = (etmp & ~__FE_ROUND_MASK) | (r); \
__fenv_ldfsr(etmp); \
} while (0)
#undef libc_feholdexcept_setroundf
#define libc_feholdexcept_setroundf(e, r) libc_feholdexcept_setround (e, r)
#undef libc_feholdexcept_setroundl
#define libc_feholdexcept_setroundl(e, r) libc_feholdexcept_setround (e, r)
#undef libc_fetestexcept
#define libc_fetestexcept(e) \
({ \
fenv_t etmp; \
__fenv_stfsr(etmp); \
etmp & (e) & FE_ALL_EXCEPT; })
#undef libc_fetestexceptf
#define libc_fetestexceptf(e) libc_fetestexcept (e)
#undef libc_fetestexceptl
#define libc_fetestexceptl(e) libc_fetestexcept (e)
#undef libc_fesetenv
#define libc_fesetenv(e) \
__fenv_ldfsr(*e)
#undef libc_fesetenvf
#define libc_fesetenvf(e) libc_fesetenv (e)
#undef libc_fesetenvl
#define libc_fesetenvl(e) libc_fesetenv (e)
#undef libc_feupdateenv
#define libc_feupdateenv(e) \
do { \
fenv_t etmp; \
__fenv_stfsr(etmp); \
__fenv_ldfsr(*e); \
__feraiseexcept (etmp & FE_ALL_EXCEPT); \
} while (0)
#undef libc_feupdateenvf
#define libc_feupdateenvf(e) libc_feupdateenv (e)
#undef libc_feupdateenvl
#define libc_feupdateenvl(e) libc_feupdateenv (e)
#endif /* SPARC_MATH_PRIVATE_H */
|
