contrib/gcc-8.0/libgcc/config/i386/sfp-machine.h

   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