OSDN Git Service

Merge in xfails from PR14107.
[pf3gnuchains/gcc-fork.git] / gcc / libgcc2.h
1 /* Header file for libgcc2.c.  */
2 /* Copyright (C) 2000, 2001
3    Free Software Foundation, Inc.
4
5 This file is part of GCC.
6
7 GCC is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 2, or (at your option) any later
10 version.
11
12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
15 for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING.  If not, write to the Free
19 Software Foundation, 59 Temple Place - Suite 330, Boston, MA
20 02111-1307, USA.  */
21
22 /* As a special exception, if you link this library with other files,
23    some of which are compiled with GCC, to produce an executable,
24    this library does not by itself cause the resulting executable
25    to be covered by the GNU General Public License.
26    This exception does not however invalidate any other reasons why
27    the executable file might be covered by the GNU General Public License.  */
28
29
30 #ifndef GCC_LIBGCC2_H
31 #define GCC_LIBGCC2_H
32
33 extern int __gcc_bcmp (const unsigned char *, const unsigned char *, size_t);
34 extern void __clear_cache (char *, char *);
35 extern void __eprintf (const char *, const char *, unsigned int, const char *)
36   __attribute__ ((__noreturn__));
37
38 struct exception_descriptor;
39 extern short int __get_eh_table_language (struct exception_descriptor *);
40 extern short int __get_eh_table_version (struct exception_descriptor *);
41
42 /* Permit the tm.h file to select the endianness to use just for this
43    file.  This is used when the endianness is determined when the
44    compiler is run.  */
45
46 #ifndef LIBGCC2_WORDS_BIG_ENDIAN
47 #define LIBGCC2_WORDS_BIG_ENDIAN WORDS_BIG_ENDIAN
48 #endif
49
50 #ifndef LIBGCC2_LONG_DOUBLE_TYPE_SIZE
51 #define LIBGCC2_LONG_DOUBLE_TYPE_SIZE LONG_DOUBLE_TYPE_SIZE
52 #endif
53
54 #ifndef MIN_UNITS_PER_WORD
55 #define MIN_UNITS_PER_WORD UNITS_PER_WORD
56 #endif
57
58 /* In the first part of this file, we are interfacing to calls generated
59    by the compiler itself.  These calls pass values into these routines
60    which have very specific modes (rather than very specific types), and
61    these compiler-generated calls also expect any return values to have
62    very specific modes (rather than very specific types).  Thus, we need
63    to avoid using regular C language type names in this part of the file
64    because the sizes for those types can be configured to be anything.
65    Instead we use the following special type names.  */
66
67 typedef          int QItype     __attribute__ ((mode (QI)));
68 typedef unsigned int UQItype    __attribute__ ((mode (QI)));
69 typedef          int HItype     __attribute__ ((mode (HI)));
70 typedef unsigned int UHItype    __attribute__ ((mode (HI)));
71 #if MIN_UNITS_PER_WORD > 1
72 /* These typedefs are usually forbidden on dsp's with UNITS_PER_WORD 1.  */
73 typedef          int SItype     __attribute__ ((mode (SI)));
74 typedef unsigned int USItype    __attribute__ ((mode (SI)));
75 #if LONG_LONG_TYPE_SIZE > 32
76 /* These typedefs are usually forbidden on archs with UNITS_PER_WORD 2.  */
77 typedef          int DItype     __attribute__ ((mode (DI)));
78 typedef unsigned int UDItype    __attribute__ ((mode (DI)));
79 #if MIN_UNITS_PER_WORD > 4
80 /* These typedefs are usually forbidden on archs with UNITS_PER_WORD 4.  */
81 typedef          int TItype     __attribute__ ((mode (TI)));
82 typedef unsigned int UTItype    __attribute__ ((mode (TI)));
83 #endif
84 #endif
85 #endif
86
87 #if BITS_PER_UNIT == 8
88
89 typedef         float SFtype    __attribute__ ((mode (SF)));
90 typedef         float DFtype    __attribute__ ((mode (DF)));
91
92 #if LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 96
93 typedef         float XFtype    __attribute__ ((mode (XF)));
94 #endif
95 #if LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 128
96 typedef         float TFtype    __attribute__ ((mode (TF)));
97 #endif
98
99 #else /* BITS_PER_UNIT != 8 */
100
101 /* On dsp's there are usually qf/hf/tqf modes used instead of the above.
102    For now we don't support them in libgcc2.c.  */
103
104 #undef L_fixdfdi
105 #undef L_fixsfdi
106 #undef L_fixtfdi
107 #undef L_fixunsdfdi
108 #undef L_fixunsdfsi
109 #undef L_fixunssfdi
110 #undef L_fixunssfsi
111 #undef L_fixunstfdi
112 #undef L_fixunsxfdi
113 #undef L_fixunsxfsi
114 #undef L_fixxfdi
115 #undef L_floatdidf
116 #undef L_floatdisf
117 #undef L_floatditf
118 #undef L_floatdixf
119
120 #endif /* BITS_PER_UNIT != 8 */
121
122 typedef int word_type __attribute__ ((mode (__word__)));
123
124 /* Make sure that we don't accidentally use any normal C language built-in
125    type names in the first part of this file.  Instead we want to use *only*
126    the type names defined above.  The following macro definitions insure
127    that if we *do* accidentally use some normal C language built-in type name,
128    we will get a syntax error.  */
129
130 #define char bogus_type
131 #define short bogus_type
132 #define int bogus_type
133 #define long bogus_type
134 #define unsigned bogus_type
135 #define float bogus_type
136 #define double bogus_type
137
138 #if MIN_UNITS_PER_WORD > 4
139 #define W_TYPE_SIZE (8 * BITS_PER_UNIT)
140 #define Wtype   DItype
141 #define UWtype  UDItype
142 #define HWtype  DItype
143 #define UHWtype UDItype
144 #define DWtype  TItype
145 #define UDWtype UTItype
146 #define __NW(a,b)       __ ## a ## di ## b
147 #define __NDW(a,b)      __ ## a ## ti ## b
148 #elif MIN_UNITS_PER_WORD > 2 \
149       || (MIN_UNITS_PER_WORD > 1 && LONG_LONG_TYPE_SIZE > 32)
150 #define W_TYPE_SIZE (4 * BITS_PER_UNIT)
151 #define Wtype   SItype
152 #define UWtype  USItype
153 #define HWtype  SItype
154 #define UHWtype USItype
155 #define DWtype  DItype
156 #define UDWtype UDItype
157 #define __NW(a,b)       __ ## a ## si ## b
158 #define __NDW(a,b)      __ ## a ## di ## b
159 #elif MIN_UNITS_PER_WORD > 1
160 #define W_TYPE_SIZE (2 * BITS_PER_UNIT)
161 #define Wtype   HItype
162 #define UWtype  UHItype
163 #define HWtype  HItype
164 #define UHWtype UHItype
165 #define DWtype  SItype
166 #define UDWtype USItype
167 #define __NW(a,b)       __ ## a ## hi ## b
168 #define __NDW(a,b)      __ ## a ## si ## b
169 #else
170 #define W_TYPE_SIZE BITS_PER_UNIT
171 #define Wtype   QItype
172 #define UWtype  UQItype
173 #define HWtype  QItype
174 #define UHWtype UQItype
175 #define DWtype  HItype
176 #define UDWtype UHItype
177 #define __NW(a,b)       __ ## a ## qi ## b
178 #define __NDW(a,b)      __ ## a ## hi ## b
179 #endif
180
181 #define Wtype_MAX ((Wtype)(((UWtype)1 << (W_TYPE_SIZE - 1)) - 1))
182 #define Wtype_MIN (- Wtype_MAX - 1)
183
184 #define __muldi3        __NDW(mul,3)
185 #define __divdi3        __NDW(div,3)
186 #define __udivdi3       __NDW(udiv,3)
187 #define __moddi3        __NDW(mod,3)
188 #define __umoddi3       __NDW(umod,3)
189 #define __negdi2        __NDW(neg,2)
190 #define __lshrdi3       __NDW(lshr,3)
191 #define __ashldi3       __NDW(ashl,3)
192 #define __ashrdi3       __NDW(ashr,3)
193 #define __cmpdi2        __NDW(cmp,2)
194 #define __ucmpdi2       __NDW(ucmp,2)
195 #define __udivmoddi4    __NDW(udivmod,4)
196 #define __fixunstfDI    __NDW(fixunstf,)
197 #define __fixtfdi       __NDW(fixtf,)
198 #define __fixunsxfDI    __NDW(fixunsxf,)
199 #define __fixxfdi       __NDW(fixxf,)
200 #define __fixunsdfDI    __NDW(fixunsdf,)
201 #define __fixdfdi       __NDW(fixdf,)
202 #define __fixunssfDI    __NDW(fixunssf,)
203 #define __fixsfdi       __NDW(fixsf,)
204 #define __floatdixf     __NDW(float,xf)
205 #define __floatditf     __NDW(float,tf)
206 #define __floatdidf     __NDW(float,df)
207 #define __floatdisf     __NDW(float,sf)
208 #define __fixunsxfSI    __NW(fixunsxf,)
209 #define __fixunstfSI    __NW(fixunstf,)
210 #define __fixunsdfSI    __NW(fixunsdf,)
211 #define __fixunssfSI    __NW(fixunssf,)
212
213 #define __ffsSI2        __NW(ffs,2)
214 #define __clzSI2        __NW(clz,2)
215 #define __ctzSI2        __NW(ctz,2)
216 #define __popcountSI2   __NW(popcount,2)
217 #define __paritySI2     __NW(parity,2)
218 #define __ffsDI2        __NDW(ffs,2)
219 #define __clzDI2        __NDW(clz,2)
220 #define __ctzDI2        __NDW(ctz,2)
221 #define __popcountDI2   __NDW(popcount,2)
222 #define __parityDI2     __NDW(parity,2)
223
224 extern DWtype __muldi3 (DWtype, DWtype);
225 extern DWtype __divdi3 (DWtype, DWtype);
226 extern UDWtype __udivdi3 (UDWtype, UDWtype);
227 extern UDWtype __umoddi3 (UDWtype, UDWtype);
228 extern DWtype __moddi3 (DWtype, DWtype);
229
230 /* __udivmoddi4 is static inline when building other libgcc2 portions.  */
231 #if (!defined (L_udivdi3) && !defined (L_divdi3) && \
232      !defined (L_umoddi3) && !defined (L_moddi3))
233 extern UDWtype __udivmoddi4 (UDWtype, UDWtype, UDWtype *);
234 #endif
235
236 /* __negdi2 is static inline when building other libgcc2 portions.  */
237 #if !defined(L_divdi3) && !defined(L_moddi3)
238 extern DWtype __negdi2 (DWtype);
239 #endif
240
241 extern DWtype __lshrdi3 (DWtype, word_type);
242 extern DWtype __ashldi3 (DWtype, word_type);
243 extern DWtype __ashrdi3 (DWtype, word_type);
244
245 /* __udiv_w_sdiv is static inline when building other libgcc2 portions.  */
246 #if (!defined(L_udivdi3) && !defined(L_divdi3) && \
247      !defined(L_umoddi3) && !defined(L_moddi3))
248 extern UWtype __udiv_w_sdiv (UWtype *, UWtype, UWtype, UWtype);
249 #endif
250
251 extern word_type __cmpdi2 (DWtype, DWtype);
252 extern word_type __ucmpdi2 (DWtype, DWtype);
253
254 extern Wtype __absvsi2 (Wtype);
255 extern DWtype __absvdi2 (DWtype);
256 extern Wtype __addvsi3 (Wtype, Wtype);
257 extern DWtype __addvdi3 (DWtype, DWtype);
258 extern Wtype __subvsi3 (Wtype, Wtype);
259 extern DWtype __subvdi3 (DWtype, DWtype);
260 extern Wtype __mulvsi3 (Wtype, Wtype);
261 extern DWtype __mulvdi3 (DWtype, DWtype);
262 extern Wtype __negvsi2 (Wtype);
263 extern DWtype __negvdi2 (DWtype);
264
265 #if BITS_PER_UNIT == 8
266 extern DWtype __fixdfdi (DFtype);
267 extern DWtype __fixsfdi (SFtype);
268 extern DFtype __floatdidf (DWtype);
269 extern SFtype __floatdisf (DWtype);
270 extern UWtype __fixunsdfSI (DFtype);
271 extern UWtype __fixunssfSI (SFtype);
272 extern DWtype __fixunsdfDI (DFtype);
273 extern DWtype __fixunssfDI (SFtype);
274
275 #if LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 96
276 extern DWtype __fixxfdi (XFtype);
277 extern DWtype __fixunsxfDI (XFtype);
278 extern XFtype __floatdixf (DWtype);
279 extern UWtype __fixunsxfSI (XFtype);
280 #endif
281
282 #if LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 128
283 extern DWtype __fixunstfDI (TFtype);
284 extern DWtype __fixtfdi (TFtype);
285 extern TFtype __floatditf (DWtype);
286 #endif
287 #endif /* BITS_PER_UNIT == 8 */
288
289 /* DWstructs are pairs of Wtype values in the order determined by
290    LIBGCC2_WORDS_BIG_ENDIAN.  */
291
292 #if LIBGCC2_WORDS_BIG_ENDIAN
293   struct DWstruct {Wtype high, low;};
294 #else
295   struct DWstruct {Wtype low, high;};
296 #endif
297
298 /* We need this union to unpack/pack DImode values, since we don't have
299    any arithmetic yet.  Incoming DImode parameters are stored into the
300    `ll' field, and the unpacked result is read from the struct `s'.  */
301
302 typedef union
303 {
304   struct DWstruct s;
305   DWtype ll;
306 } DWunion;
307
308 #include "longlong.h"
309
310 #endif /* ! GCC_LIBGCC2_H */