Details | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 6518 | serge | 1 | #ifdef __MINGW32__ |
| 2 | /* Make sure we are using gnu-style bitfield handling. */ |
||
| 3 | #define _FP_STRUCT_LAYOUT __attribute__ ((gcc_struct)) |
||
| 4 | #endif |
||
| 5 | |||
| 6 | /* The type of the result of a floating point comparison. This must |
||
| 7 | match `__libgcc_cmp_return__' in GCC for the target. */ |
||
| 8 | typedef int __gcc_CMPtype __attribute__ ((mode (__libgcc_cmp_return__))); |
||
| 9 | #define CMPtype __gcc_CMPtype |
||
| 10 | |||
| 11 | #ifdef __x86_64__ |
||
| 12 | #include "config/i386/64/sfp-machine.h" |
||
| 13 | #else |
||
| 14 | #include "config/i386/32/sfp-machine.h" |
||
| 15 | #endif |
||
| 16 | |||
| 17 | #define _FP_KEEPNANFRACP 1 |
||
| 18 | #define _FP_QNANNEGATEDP 0 |
||
| 19 | |||
| 20 | #define _FP_NANSIGN_S 1 |
||
| 21 | #define _FP_NANSIGN_D 1 |
||
| 22 | #define _FP_NANSIGN_E 1 |
||
| 23 | #define _FP_NANSIGN_Q 1 |
||
| 24 | |||
| 25 | /* Here is something Intel misdesigned: the specs don't define |
||
| 26 | the case where we have two NaNs with same mantissas, but |
||
| 27 | different sign. Different operations pick up different NaNs. */ |
||
| 28 | #define _FP_CHOOSENAN(fs, wc, R, X, Y, OP) \ |
||
| 29 | do { \ |
||
| 30 | if (_FP_FRAC_GT_##wc(X, Y) \ |
||
| 31 | || (_FP_FRAC_EQ_##wc(X,Y) && (OP == '+' || OP == '*'))) \ |
||
| 32 | { \ |
||
| 33 | R##_s = X##_s; \ |
||
| 34 | _FP_FRAC_COPY_##wc(R,X); \ |
||
| 35 | } \ |
||
| 36 | else \ |
||
| 37 | { \ |
||
| 38 | R##_s = Y##_s; \ |
||
| 39 | _FP_FRAC_COPY_##wc(R,Y); \ |
||
| 40 | } \ |
||
| 41 | R##_c = FP_CLS_NAN; \ |
||
| 42 | } while (0) |
||
| 43 | |||
| 44 | #ifndef _SOFT_FLOAT |
||
| 45 | #define FP_EX_INVALID 0x01 |
||
| 46 | #define FP_EX_DENORM 0x02 |
||
| 47 | #define FP_EX_DIVZERO 0x04 |
||
| 48 | #define FP_EX_OVERFLOW 0x08 |
||
| 49 | #define FP_EX_UNDERFLOW 0x10 |
||
| 50 | #define FP_EX_INEXACT 0x20 |
||
| 51 | #define FP_EX_ALL \ |
||
| 52 | (FP_EX_INVALID | FP_EX_DENORM | FP_EX_DIVZERO | FP_EX_OVERFLOW \ |
||
| 53 | | FP_EX_UNDERFLOW | FP_EX_INEXACT) |
||
| 54 | |||
| 55 | void __sfp_handle_exceptions (int); |
||
| 56 | |||
| 57 | #define FP_HANDLE_EXCEPTIONS \ |
||
| 58 | do { \ |
||
| 59 | if (__builtin_expect (_fex, 0)) \ |
||
| 60 | __sfp_handle_exceptions (_fex); \ |
||
| 61 | } while (0); |
||
| 62 | |||
| 63 | #define FP_TRAPPING_EXCEPTIONS ((~_fcw >> FP_EX_SHIFT) & FP_EX_ALL) |
||
| 64 | |||
| 65 | #define FP_ROUNDMODE (_fcw & FP_RND_MASK) |
||
| 66 | #endif |
||
| 67 | |||
| 68 | #define _FP_TININESS_AFTER_ROUNDING 1 |
||
| 69 | |||
| 70 | #define __LITTLE_ENDIAN 1234 |
||
| 71 | #define __BIG_ENDIAN 4321 |
||
| 72 | |||
| 73 | #define __BYTE_ORDER __LITTLE_ENDIAN |
||
| 74 | |||
| 75 | /* Define ALIASNAME as a strong alias for NAME. */ |
||
| 76 | #if defined __MACH__ |
||
| 77 | /* Mach-O doesn't support aliasing. If these functions ever return |
||
| 78 | anything but CMPtype we need to revisit this... */ |
||
| 79 | #define strong_alias(name, aliasname) \ |
||
| 80 | CMPtype aliasname (TFtype a, TFtype b) { return name(a, b); } |
||
| 81 | #else |
||
| 82 | # define strong_alias(name, aliasname) _strong_alias(name, aliasname) |
||
| 83 | # define _strong_alias(name, aliasname) \ |
||
| 84 | extern __typeof (name) aliasname __attribute__ ((alias (#name))); |
||
| 85 | #endif |