Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | RSS feed

  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
  86.