blob: bb4c04e58bd97463eb6ec291b0e020345a18dc6e (
plain)
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
|
#ifndef __NONSTD_TGMATH_H__
#define __NONSTD_TGMATH_H__
#include <math.h>
#ifndef FP_ZERO
#include "FP_ZERO.h"
#endif
#ifndef FP_INFINITE
#include "FP_INFINITE.h"
#endif
#ifndef FP_NAN
#include "FP_NAN.h"
#endif
#ifndef FP_NORMAL
#include "FP_NORMAL.h"
#endif
#ifndef NAN
#include "NAN.h"
#endif
#ifndef INFINITY
#include "INFINITY.h"
#endif
#if ((!defined __STDC_VERSION__) || (__STDC_VERSION__ < 199901L))
#undef feraiseexcept
#define feraiseexcept(_)
#endif
#ifndef fpclassify
#include "fpclassify.h"
#endif
#ifndef signbit
#include "signbit.h"
#endif
#ifndef copysign
#define copysign(_x, _y) (_x < 0 ? -_y : _y)
#endif
#ifndef M_PI
#include "M_PI.h"
#endif
#ifndef M_PI_2
#include "M_PI_2.h"
#endif
#ifndef M_PI_4
#include "M_PI_4.h"
#endif
#ifdef TGSOURCE
# if (defined __STDC_VERSION__ && __STDC_VERSION__ >= 199901L)
# define TGCMPLX(__x, __y) CMPLXF(__x, __y)
# define TGFN(__x) __x##f
# define TYPE float
# define TGHUGE HUGE_VALF
# include TGSOURCE
# undef TGCMPLX
# undef TGFN
# undef TYPE
# undef TGHUGE
# define TGCMPLX(__x, __y) CMPLXL(__x, __y)
# define TGFN(__x) __x##l
# define TYPE long double
# define TGHUGE HUGE_VALL
# include TGSOURCE
# undef TGCMPLX
# undef TGFN
# undef TYPE
# undef TGHUGE
# endif
#endif
#define TGCMPLX(__x, __y) CMPLX(__x, __y)
#define TGFN(__x) __x
#define TYPE double
#define TGHUGE HUGE_VAL
#endif
|
