1 #define _FP_W_TYPE_SIZE 32
2 #define _FP_W_TYPE unsigned long
3 #define _FP_WS_TYPE signed long
4 #define _FP_I_TYPE long
6 typedef int TItype
__attribute__ ((mode (TI
)));
7 typedef unsigned int UTItype
__attribute__ ((mode (TI
)));
9 #define TI_BITS (__CHAR_BIT__ * (int)sizeof(TItype))
11 /* The type of the result of a floating point comparison. This must
12 match `__libgcc_cmp_return__' in GCC for the target. */
13 typedef int __gcc_CMPtype
__attribute__ ((mode (__libgcc_cmp_return__
)));
14 #define CMPtype __gcc_CMPtype
16 #define _FP_MUL_MEAT_S(R,X,Y) \
17 _FP_MUL_MEAT_1_wide(_FP_WFRACBITS_S,R,X,Y,umul_ppmm)
18 #define _FP_MUL_MEAT_D(R,X,Y) \
19 _FP_MUL_MEAT_2_wide(_FP_WFRACBITS_D,R,X,Y,umul_ppmm)
20 #define _FP_MUL_MEAT_Q(R,X,Y) \
21 _FP_MUL_MEAT_4_wide(_FP_WFRACBITS_Q,R,X,Y,umul_ppmm)
23 #define _FP_DIV_MEAT_S(R,X,Y) _FP_DIV_MEAT_1_loop(S,R,X,Y)
24 #define _FP_DIV_MEAT_D(R,X,Y) _FP_DIV_MEAT_2_udiv(D,R,X,Y)
25 #define _FP_DIV_MEAT_Q(R,X,Y) _FP_DIV_MEAT_4_udiv(Q,R,X,Y)
27 #define _FP_NANFRAC_S _FP_QNANBIT_S
28 #define _FP_NANFRAC_D _FP_QNANBIT_D, 0
29 #define _FP_NANFRAC_Q _FP_QNANBIT_Q, 0, 0, 0
30 #define _FP_NANSIGN_S 1
31 #define _FP_NANSIGN_D 1
32 #define _FP_NANSIGN_Q 1
34 #define _FP_KEEPNANFRACP 1
35 #define _FP_QNANNEGATEDP 0
37 #define _FP_CHOOSENAN(fs, wc, R, X, Y, OP) \
39 if ((_FP_FRAC_HIGH_RAW_##fs(X) & _FP_QNANBIT_##fs) \
40 && !(_FP_FRAC_HIGH_RAW_##fs(Y) & _FP_QNANBIT_##fs)) \
43 _FP_FRAC_COPY_##wc(R,Y); \
48 _FP_FRAC_COPY_##wc(R,X); \
53 #define _FP_TININESS_AFTER_ROUNDING 0
55 #define __LITTLE_ENDIAN 1234
56 #define __BIG_ENDIAN 4321
58 #if defined __BIG_ENDIAN__
59 #define __BYTE_ORDER __BIG_ENDIAN
61 #define __BYTE_ORDER __LITTLE_ENDIAN
64 /* Define ALIASNAME as a strong alias for NAME. */
65 # define strong_alias(name, aliasname) _strong_alias(name, aliasname)
66 # define _strong_alias(name, aliasname) \
67 extern __typeof (name) aliasname __attribute__ ((alias (#name)));