1 |
734 |
jeremybenn |
/* Soft-FP definitions for TI C6X.
|
2 |
|
|
Copyright (C) 2010, 2011 Free Software Foundation, Inc.
|
3 |
|
|
|
4 |
|
|
This files is free software; you can redistribute it and/or
|
5 |
|
|
modify it under the terms of the GNU Lesser General Public
|
6 |
|
|
License as published by the Free Software Foundation; either
|
7 |
|
|
version 2.1 of the License, or (at your option) any later version.
|
8 |
|
|
|
9 |
|
|
In addition to the permissions in the GNU Lesser General Public
|
10 |
|
|
License, the Free Software Foundation gives you unlimited
|
11 |
|
|
permission to link the compiled version of this file into
|
12 |
|
|
combinations with other programs, and to distribute those
|
13 |
|
|
combinations without any restriction coming from the use of this
|
14 |
|
|
file. (The Lesser General Public License restrictions do apply in
|
15 |
|
|
other respects; for example, they cover modification of the file,
|
16 |
|
|
and distribution when not linked into a combine executable.)
|
17 |
|
|
|
18 |
|
|
This file is distributed in the hope that it will be useful,
|
19 |
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
20 |
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
21 |
|
|
Lesser General Public License for more details.
|
22 |
|
|
|
23 |
|
|
You should have received a copy of the GNU Lesser General Public
|
24 |
|
|
License along with GCC; see the file COPYING.LIB. If not see
|
25 |
|
|
<http://www.gnu.org/licenses/>. */
|
26 |
|
|
|
27 |
|
|
#define _FP_W_TYPE_SIZE 32
|
28 |
|
|
#define _FP_W_TYPE unsigned long
|
29 |
|
|
#define _FP_WS_TYPE signed long
|
30 |
|
|
#define _FP_I_TYPE long
|
31 |
|
|
|
32 |
|
|
#define _FP_MUL_MEAT_S(R,X,Y) \
|
33 |
|
|
_FP_MUL_MEAT_1_wide(_FP_WFRACBITS_S,R,X,Y,umul_ppmm)
|
34 |
|
|
#define _FP_MUL_MEAT_D(R,X,Y) \
|
35 |
|
|
_FP_MUL_MEAT_2_wide(_FP_WFRACBITS_D,R,X,Y,umul_ppmm)
|
36 |
|
|
#define _FP_MUL_MEAT_Q(R,X,Y) \
|
37 |
|
|
_FP_MUL_MEAT_4_wide(_FP_WFRACBITS_Q,R,X,Y,umul_ppmm)
|
38 |
|
|
|
39 |
|
|
#define _FP_DIV_MEAT_S(R,X,Y) _FP_DIV_MEAT_1_loop(S,R,X,Y)
|
40 |
|
|
#define _FP_DIV_MEAT_D(R,X,Y) _FP_DIV_MEAT_2_udiv(D,R,X,Y)
|
41 |
|
|
#define _FP_DIV_MEAT_Q(R,X,Y) _FP_DIV_MEAT_4_udiv(Q,R,X,Y)
|
42 |
|
|
|
43 |
|
|
#define _FP_NANFRAC_H ((_FP_QNANBIT_H << 1) - 1)
|
44 |
|
|
#define _FP_NANFRAC_S ((_FP_QNANBIT_S << 1) - 1)
|
45 |
|
|
#define _FP_NANFRAC_D ((_FP_QNANBIT_D << 1) - 1), -1
|
46 |
|
|
#define _FP_NANFRAC_Q ((_FP_QNANBIT_Q << 1) - 1), -1, -1, -1
|
47 |
|
|
#define _FP_NANSIGN_H 0
|
48 |
|
|
#define _FP_NANSIGN_S 0
|
49 |
|
|
#define _FP_NANSIGN_D 0
|
50 |
|
|
#define _FP_NANSIGN_Q 0
|
51 |
|
|
|
52 |
|
|
#define _FP_KEEPNANFRACP 1
|
53 |
|
|
|
54 |
|
|
/* Someone please check this. */
|
55 |
|
|
#define _FP_CHOOSENAN(fs, wc, R, X, Y, OP) \
|
56 |
|
|
do { \
|
57 |
|
|
if ((_FP_FRAC_HIGH_RAW_##fs(X) & _FP_QNANBIT_##fs) \
|
58 |
|
|
&& !(_FP_FRAC_HIGH_RAW_##fs(Y) & _FP_QNANBIT_##fs)) \
|
59 |
|
|
{ \
|
60 |
|
|
R##_s = Y##_s; \
|
61 |
|
|
_FP_FRAC_COPY_##wc(R,Y); \
|
62 |
|
|
} \
|
63 |
|
|
else \
|
64 |
|
|
{ \
|
65 |
|
|
R##_s = X##_s; \
|
66 |
|
|
_FP_FRAC_COPY_##wc(R,X); \
|
67 |
|
|
} \
|
68 |
|
|
R##_c = FP_CLS_NAN; \
|
69 |
|
|
} while (0)
|
70 |
|
|
|
71 |
|
|
#define __LITTLE_ENDIAN 1234
|
72 |
|
|
#define __BIG_ENDIAN 4321
|
73 |
|
|
|
74 |
|
|
#if defined _BIG_ENDIAN
|
75 |
|
|
# define __BYTE_ORDER __BIG_ENDIAN
|
76 |
|
|
#else
|
77 |
|
|
# define __BYTE_ORDER __LITTLE_ENDIAN
|
78 |
|
|
#endif
|
79 |
|
|
|
80 |
|
|
|
81 |
|
|
/* Define ALIASNAME as a strong alias for NAME. */
|
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 |
|
|
|
86 |
|
|
/* Rename helper functions to the names specified in the C6000 ELF ABI. */
|
87 |
|
|
#define __fixdfsi __c6xabi_fixdi
|
88 |
|
|
#define __fixsfsi __c6xabi_fixfi
|
89 |
|
|
#define __floatsidf __c6xabi_fltid
|
90 |
|
|
#define __floatunsidf __c6xabi_fltud
|
91 |
|
|
#define __floatsisf __c6xabi_fltif
|
92 |
|
|
#define __floatunsisf __c6xabi_fltuf
|
93 |
|
|
#define __truncdfsf2 __c6xabi_cvtdf
|
94 |
|
|
#define __extendsfdf2 __c6xabi_cvtfd
|
95 |
|
|
#define __adddf3 __c6xabi_addd
|
96 |
|
|
#define __subdf3 __c6xabi_subd
|
97 |
|
|
#define __muldf3 __c6xabi_mpyd
|
98 |
|
|
#define __divdf3 __c6xabi_divd
|
99 |
|
|
#define __negdf2 __c6xabi_negd
|
100 |
|
|
#define __absdf2 __c6xabi_absd
|
101 |
|
|
#define __addsf3 __c6xabi_addf
|
102 |
|
|
#define __subsf3 __c6xabi_subf
|
103 |
|
|
#define __mulsf3 __c6xabi_mpyf
|
104 |
|
|
#define __divsf3 __c6xabi_divf
|
105 |
|
|
#define __negsf2 __c6xabi_negf
|
106 |
|
|
#define __abssf2 __c6xabi_absf
|
107 |
|
|
#define __lesf2 __c6xabi_cmpf
|
108 |
|
|
#define __ledf2 __c6xabi_cmpd
|
109 |
|
|
#define __ltsf2 __gnu_ltsf2
|
110 |
|
|
#define __ltdf2 __gnu_ltdf2
|
111 |
|
|
#define __gesf2 __gnu_gesf2
|
112 |
|
|
#define __gedf2 __gnu_gedf2
|
113 |
|
|
#define __gtsf2 __gnu_gtsf2
|
114 |
|
|
#define __gtdf2 __gnu_gtdf2
|
115 |
|
|
#define __eqsf2 __gnu_eqsf2
|
116 |
|
|
#define __eqdf2 __gnu_eqdf2
|
117 |
|
|
#define __nesf2 __c6xabi_neqf
|
118 |
|
|
#define __nedf2 __c6xabi_neqd
|
119 |
|
|
#define __unordsf2 __c6xabi_unordf
|
120 |
|
|
#define __unorddf2 __c6xabi_unordd
|