OSDN Git Service

* config/pdp11/pdp11.md (various): Fix conditions on a number of
[pf3gnuchains/gcc-fork.git] / gcc / libgcc2.h
1 /* Header file for libgcc2.c.  */
2 /* Copyright (C) 2000, 2001, 2004, 2005, 2009
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 3, 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 Under Section 7 of GPL version 3, you are granted additional
18 permissions described in the GCC Runtime Library Exception, version
19 3.1, as published by the Free Software Foundation.
20
21 You should have received a copy of the GNU General Public License and
22 a copy of the GCC Runtime Library Exception along with this program;
23 see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
24 <http://www.gnu.org/licenses/>.  */
25
26 #ifndef GCC_LIBGCC2_H
27 #define GCC_LIBGCC2_H
28
29 #ifndef HIDE_EXPORTS
30 #pragma GCC visibility push(default)
31 #endif
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 /* Permit the tm.h file to select the endianness to use just for this
39    file.  This is used when the endianness is determined when the
40    compiler is run.  */
41
42 #ifndef LIBGCC2_WORDS_BIG_ENDIAN
43 #define LIBGCC2_WORDS_BIG_ENDIAN WORDS_BIG_ENDIAN
44 #endif
45
46 #ifndef LIBGCC2_LONG_DOUBLE_TYPE_SIZE
47 #define LIBGCC2_LONG_DOUBLE_TYPE_SIZE LONG_DOUBLE_TYPE_SIZE
48 #endif
49
50 #ifndef LIBGCC2_HAS_SF_MODE
51 #define LIBGCC2_HAS_SF_MODE (BITS_PER_UNIT == 8)
52 #endif
53
54 #ifndef LIBGCC2_HAS_DF_MODE
55 #define LIBGCC2_HAS_DF_MODE \
56   (BITS_PER_UNIT == 8 \
57    && (__SIZEOF_DOUBLE__ * __CHAR_BIT__ == 64 \
58        || LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 64))
59 #endif
60
61 #ifndef LIBGCC2_HAS_XF_MODE
62 #define LIBGCC2_HAS_XF_MODE \
63   (BITS_PER_UNIT == 8 && LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 80)
64 #endif
65
66 #ifndef LIBGCC2_HAS_TF_MODE
67 #define LIBGCC2_HAS_TF_MODE \
68   (BITS_PER_UNIT == 8 && LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 128)
69 #endif
70
71 #ifndef SF_SIZE
72 #if LIBGCC2_HAS_SF_MODE
73 #define SF_SIZE FLT_MANT_DIG
74 #else
75 #define SF_SIZE 0
76 #endif
77 #endif
78
79 #ifndef DF_SIZE
80 #if LIBGCC2_HAS_DF_MODE
81 #if __SIZEOF_DOUBLE__ * __CHAR_BIT__ == 64
82 #define DF_SIZE DBL_MANT_DIG
83 #elif LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 64
84 #define DF_SIZE LDBL_MANT_DIG
85 #else
86 #define DF_SIZE 0
87 #endif
88 #else
89 #define DF_SIZE 0
90 #endif
91 #endif
92
93 #ifndef XF_SIZE
94 #if LIBGCC2_HAS_XF_MODE
95 #define XF_SIZE LDBL_MANT_DIG
96 #else
97 #define XF_SIZE 0
98 #endif
99 #endif
100
101 #ifndef TF_SIZE
102 #if LIBGCC2_HAS_TF_MODE
103 #define TF_SIZE LDBL_MANT_DIG
104 #else
105 #define TF_SIZE 0
106 #endif
107 #endif
108
109 /* FIXME: This #ifdef probably should be removed, ie. enable the test
110    for mips too.  */
111 /* Don't use IBM Extended Double TFmode for TI->SF calculations.
112    The conversion from long double to float suffers from double
113    rounding, because we convert via double.  In other cases, going
114    through the software fp routines is much slower than the fallback.  */
115 #ifdef __powerpc__
116 #define AVOID_FP_TYPE_CONVERSION(SIZE) (SIZE == 106)
117 #elif defined(WIDEST_HARDWARE_FP_SIZE)
118 #define AVOID_FP_TYPE_CONVERSION(SIZE) (SIZE > WIDEST_HARDWARE_FP_SIZE)
119 #else
120 #define AVOID_FP_TYPE_CONVERSION(SIZE) 0
121 #endif
122
123 /* In the first part of this file, we are interfacing to calls generated
124    by the compiler itself.  These calls pass values into these routines
125    which have very specific modes (rather than very specific types), and
126    these compiler-generated calls also expect any return values to have
127    very specific modes (rather than very specific types).  Thus, we need
128    to avoid using regular C language type names in this part of the file
129    because the sizes for those types can be configured to be anything.
130    Instead we use the following special type names.  */
131
132 typedef          int QItype     __attribute__ ((mode (QI)));
133 typedef unsigned int UQItype    __attribute__ ((mode (QI)));
134 typedef          int HItype     __attribute__ ((mode (HI)));
135 typedef unsigned int UHItype    __attribute__ ((mode (HI)));
136 #if MIN_UNITS_PER_WORD > 1
137 /* These typedefs are usually forbidden on dsp's with UNITS_PER_WORD 1.  */
138 typedef          int SItype     __attribute__ ((mode (SI)));
139 typedef unsigned int USItype    __attribute__ ((mode (SI)));
140 #if __SIZEOF_LONG_LONG__ > 4
141 /* These typedefs are usually forbidden on archs with UNITS_PER_WORD 2.  */
142 typedef          int DItype     __attribute__ ((mode (DI)));
143 typedef unsigned int UDItype    __attribute__ ((mode (DI)));
144 #if MIN_UNITS_PER_WORD > 4
145 /* These typedefs are usually forbidden on archs with UNITS_PER_WORD 4.  */
146 typedef          int TItype     __attribute__ ((mode (TI)));
147 typedef unsigned int UTItype    __attribute__ ((mode (TI)));
148 #endif
149 #endif
150 #endif
151
152 #if LIBGCC2_HAS_SF_MODE
153 typedef         float SFtype    __attribute__ ((mode (SF)));
154 typedef _Complex float SCtype   __attribute__ ((mode (SC)));
155 #endif
156 #if LIBGCC2_HAS_DF_MODE
157 typedef         float DFtype    __attribute__ ((mode (DF)));
158 typedef _Complex float DCtype   __attribute__ ((mode (DC)));
159 #endif
160 #if LIBGCC2_HAS_XF_MODE
161 typedef         float XFtype    __attribute__ ((mode (XF)));
162 typedef _Complex float XCtype   __attribute__ ((mode (XC)));
163 #endif
164 #if LIBGCC2_HAS_TF_MODE
165 typedef         float TFtype    __attribute__ ((mode (TF)));
166 typedef _Complex float TCtype   __attribute__ ((mode (TC)));
167 #endif
168
169 typedef int cmp_return_type __attribute__((mode (__libgcc_cmp_return__)));
170 typedef int shift_count_type __attribute__((mode (__libgcc_shift_count__)));
171
172 /* Make sure that we don't accidentally use any normal C language built-in
173    type names in the first part of this file.  Instead we want to use *only*
174    the type names defined above.  The following macro definitions insure
175    that if we *do* accidentally use some normal C language built-in type name,
176    we will get a syntax error.  */
177
178 #define char bogus_type
179 #define short bogus_type
180 #define int bogus_type
181 #define long bogus_type
182 #define unsigned bogus_type
183 #define float bogus_type
184 #define double bogus_type
185
186 /* Versions prior to 3.4.4 were not taking into account the word size for
187    the 5 trapping arithmetic functions absv, addv, subv, mulv and negv.  As
188    a consequence, the si and di variants were always and the only ones emitted.
189    To maintain backward compatibility, COMPAT_SIMODE_TRAPPING_ARITHMETIC is
190    defined on platforms where it makes sense to still have the si variants
191    emitted.  As a bonus, their implementation is now correct.  Note that the
192    same mechanism should have been implemented for the di variants, but it
193    turns out that no platform would define COMPAT_DIMODE_TRAPPING_ARITHMETIC
194    if it existed.  */
195
196 #if LIBGCC2_UNITS_PER_WORD == 8
197 #define W_TYPE_SIZE (8 * BITS_PER_UNIT)
198 #define Wtype   DItype
199 #define UWtype  UDItype
200 #define HWtype  DItype
201 #define UHWtype UDItype
202 #define DWtype  TItype
203 #define UDWtype UTItype
204 #define __NW(a,b)       __ ## a ## di ## b
205 #define __NDW(a,b)      __ ## a ## ti ## b
206 #define COMPAT_SIMODE_TRAPPING_ARITHMETIC
207 #elif LIBGCC2_UNITS_PER_WORD == 4
208 #define W_TYPE_SIZE (4 * BITS_PER_UNIT)
209 #define Wtype   SItype
210 #define UWtype  USItype
211 #define HWtype  SItype
212 #define UHWtype USItype
213 #define DWtype  DItype
214 #define UDWtype UDItype
215 #define __NW(a,b)       __ ## a ## si ## b
216 #define __NDW(a,b)      __ ## a ## di ## b
217 #elif LIBGCC2_UNITS_PER_WORD == 2
218 #define W_TYPE_SIZE (2 * BITS_PER_UNIT)
219 #define Wtype   HItype
220 #define UWtype  UHItype
221 #define HWtype  HItype
222 #define UHWtype UHItype
223 #define DWtype  SItype
224 #define UDWtype USItype
225 #define __NW(a,b)       __ ## a ## hi ## b
226 #define __NDW(a,b)      __ ## a ## si ## b
227 #else
228 #define W_TYPE_SIZE BITS_PER_UNIT
229 #define Wtype   QItype
230 #define UWtype  UQItype
231 #define HWtype  QItype
232 #define UHWtype UQItype
233 #define DWtype  HItype
234 #define UDWtype UHItype
235 #define __NW(a,b)       __ ## a ## qi ## b
236 #define __NDW(a,b)      __ ## a ## hi ## b
237 #endif
238
239 #define Wtype_MAX ((Wtype)(((UWtype)1 << (W_TYPE_SIZE - 1)) - 1))
240 #define Wtype_MIN (- Wtype_MAX - 1)
241
242 #if W_TYPE_SIZE == 8
243 # define Wtype_MAXp1_F  0x1p8f
244 #elif W_TYPE_SIZE == 16
245 # define Wtype_MAXp1_F  0x1p16f
246 #elif W_TYPE_SIZE == 32
247 # define Wtype_MAXp1_F  0x1p32f
248 #elif W_TYPE_SIZE == 64
249 # define Wtype_MAXp1_F  0x1p64f
250 #else
251 # error "expand the table"
252 #endif
253
254 #define __muldi3        __NDW(mul,3)
255 #define __divdi3        __NDW(div,3)
256 #define __udivdi3       __NDW(udiv,3)
257 #define __moddi3        __NDW(mod,3)
258 #define __umoddi3       __NDW(umod,3)
259 #define __negdi2        __NDW(neg,2)
260 #define __lshrdi3       __NDW(lshr,3)
261 #define __ashldi3       __NDW(ashl,3)
262 #define __ashrdi3       __NDW(ashr,3)
263 #define __cmpdi2        __NDW(cmp,2)
264 #define __ucmpdi2       __NDW(ucmp,2)
265 #define __udivmoddi4    __NDW(udivmod,4)
266 #define __fixunstfDI    __NDW(fixunstf,)
267 #define __fixtfdi       __NDW(fixtf,)
268 #define __fixunsxfDI    __NDW(fixunsxf,)
269 #define __fixxfdi       __NDW(fixxf,)
270 #define __fixunsdfDI    __NDW(fixunsdf,)
271 #define __fixdfdi       __NDW(fixdf,)
272 #define __fixunssfDI    __NDW(fixunssf,)
273 #define __fixsfdi       __NDW(fixsf,)
274 #define __floatdixf     __NDW(float,xf)
275 #define __floatditf     __NDW(float,tf)
276 #define __floatdidf     __NDW(float,df)
277 #define __floatdisf     __NDW(float,sf)
278 #define __floatundixf   __NDW(floatun,xf)
279 #define __floatunditf   __NDW(floatun,tf)
280 #define __floatundidf   __NDW(floatun,df)
281 #define __floatundisf   __NDW(floatun,sf)
282 #define __fixunsxfSI    __NW(fixunsxf,)
283 #define __fixunstfSI    __NW(fixunstf,)
284 #define __fixunsdfSI    __NW(fixunsdf,)
285 #define __fixunssfSI    __NW(fixunssf,)
286
287 #define __absvSI2       __NW(absv,2)
288 #define __addvSI3       __NW(addv,3)
289 #define __subvSI3       __NW(subv,3)
290 #define __mulvSI3       __NW(mulv,3)
291 #define __negvSI2       __NW(negv,2)
292 #define __absvDI2       __NDW(absv,2)
293 #define __addvDI3       __NDW(addv,3)
294 #define __subvDI3       __NDW(subv,3)
295 #define __mulvDI3       __NDW(mulv,3)
296 #define __negvDI2       __NDW(negv,2)
297
298 #define __ffsSI2        __NW(ffs,2)
299 #define __clzSI2        __NW(clz,2)
300 #define __ctzSI2        __NW(ctz,2)
301 #define __popcountSI2   __NW(popcount,2)
302 #define __paritySI2     __NW(parity,2)
303 #define __ffsDI2        __NDW(ffs,2)
304 #define __clzDI2        __NDW(clz,2)
305 #define __ctzDI2        __NDW(ctz,2)
306 #define __popcountDI2   __NDW(popcount,2)
307 #define __parityDI2     __NDW(parity,2)
308
309 extern DWtype __muldi3 (DWtype, DWtype);
310 extern DWtype __divdi3 (DWtype, DWtype);
311 extern UDWtype __udivdi3 (UDWtype, UDWtype);
312 extern UDWtype __umoddi3 (UDWtype, UDWtype);
313 extern DWtype __moddi3 (DWtype, DWtype);
314
315 /* __udivmoddi4 is static inline when building other libgcc2 portions.  */
316 #if (!defined (L_udivdi3) && !defined (L_divdi3) && \
317      !defined (L_umoddi3) && !defined (L_moddi3))
318 extern UDWtype __udivmoddi4 (UDWtype, UDWtype, UDWtype *);
319 #endif
320
321 /* __negdi2 is static inline when building other libgcc2 portions.  */
322 #if !defined(L_divdi3) && !defined(L_moddi3)
323 extern DWtype __negdi2 (DWtype);
324 #endif
325
326 extern DWtype __lshrdi3 (DWtype, shift_count_type);
327 extern DWtype __ashldi3 (DWtype, shift_count_type);
328 extern DWtype __ashrdi3 (DWtype, shift_count_type);
329
330 /* __udiv_w_sdiv is static inline when building other libgcc2 portions.  */
331 #if (!defined(L_udivdi3) && !defined(L_divdi3) && \
332      !defined(L_umoddi3) && !defined(L_moddi3))
333 extern UWtype __udiv_w_sdiv (UWtype *, UWtype, UWtype, UWtype);
334 #endif
335
336 extern cmp_return_type __cmpdi2 (DWtype, DWtype);
337 extern cmp_return_type __ucmpdi2 (DWtype, DWtype);
338
339 #if MIN_UNITS_PER_WORD > 1
340 extern SItype __bswapsi2 (SItype);
341 #endif
342 #if __SIZEOF_LONG_LONG__ > 4
343 extern DItype __bswapdi2 (DItype);
344 #endif
345
346 extern Wtype __absvSI2 (Wtype);
347 extern Wtype __addvSI3 (Wtype, Wtype);
348 extern Wtype __subvSI3 (Wtype, Wtype);
349 extern Wtype __mulvSI3 (Wtype, Wtype);
350 extern Wtype __negvSI2 (Wtype);
351 extern DWtype __absvDI2 (DWtype);
352 extern DWtype __addvDI3 (DWtype, DWtype);
353 extern DWtype __subvDI3 (DWtype, DWtype);
354 extern DWtype __mulvDI3 (DWtype, DWtype);
355 extern DWtype __negvDI2 (DWtype);
356
357 #ifdef COMPAT_SIMODE_TRAPPING_ARITHMETIC
358 extern SItype __absvsi2 (SItype);
359 extern SItype __addvsi3 (SItype, SItype);
360 extern SItype __subvsi3 (SItype, SItype);
361 extern SItype __mulvsi3 (SItype, SItype);
362 extern SItype __negvsi2 (SItype);
363 #endif /* COMPAT_SIMODE_TRAPPING_ARITHMETIC */
364
365 #undef int
366 #if LIBGCC2_HAS_SF_MODE
367 extern DWtype __fixsfdi (SFtype);
368 extern SFtype __floatdisf (DWtype);
369 extern SFtype __floatundisf (UDWtype);
370 extern UWtype __fixunssfSI (SFtype);
371 extern UDWtype __fixunssfDI (SFtype);
372 extern SFtype __powisf2 (SFtype, int);
373 extern SCtype __divsc3 (SFtype, SFtype, SFtype, SFtype);
374 extern SCtype __mulsc3 (SFtype, SFtype, SFtype, SFtype);
375 #endif
376 #if LIBGCC2_HAS_DF_MODE
377 extern DWtype __fixdfdi (DFtype);
378 extern DFtype __floatdidf (DWtype);
379 extern DFtype __floatundidf (UDWtype);
380 extern UWtype __fixunsdfSI (DFtype);
381 extern UDWtype __fixunsdfDI (DFtype);
382 extern DFtype __powidf2 (DFtype, int);
383 extern DCtype __divdc3 (DFtype, DFtype, DFtype, DFtype);
384 extern DCtype __muldc3 (DFtype, DFtype, DFtype, DFtype);
385 #endif
386
387 #if LIBGCC2_HAS_XF_MODE
388 extern DWtype __fixxfdi (XFtype);
389 extern UDWtype __fixunsxfDI (XFtype);
390 extern XFtype __floatdixf (DWtype);
391 extern XFtype __floatundixf (UDWtype);
392 extern UWtype __fixunsxfSI (XFtype);
393 extern XFtype __powixf2 (XFtype, int);
394 extern XCtype __divxc3 (XFtype, XFtype, XFtype, XFtype);
395 extern XCtype __mulxc3 (XFtype, XFtype, XFtype, XFtype);
396 #endif
397
398 #if LIBGCC2_HAS_TF_MODE
399 extern UDWtype __fixunstfDI (TFtype);
400 extern DWtype __fixtfdi (TFtype);
401 extern TFtype __floatditf (DWtype);
402 extern TFtype __floatunditf (UDWtype);
403 extern TFtype __powitf2 (TFtype, int);
404 extern TCtype __divtc3 (TFtype, TFtype, TFtype, TFtype);
405 extern TCtype __multc3 (TFtype, TFtype, TFtype, TFtype);
406 #endif
407 #define int bogus_type
408
409 /* DWstructs are pairs of Wtype values in the order determined by
410    LIBGCC2_WORDS_BIG_ENDIAN.  */
411
412 #if LIBGCC2_WORDS_BIG_ENDIAN
413   struct DWstruct {Wtype high, low;};
414 #else
415   struct DWstruct {Wtype low, high;};
416 #endif
417
418 /* We need this union to unpack/pack DImode values, since we don't have
419    any arithmetic yet.  Incoming DImode parameters are stored into the
420    `ll' field, and the unpacked result is read from the struct `s'.  */
421
422 typedef union
423 {
424   struct DWstruct s;
425   DWtype ll;
426 } DWunion;
427
428 /* Defined for L_popcount_tab.  Exported here because some targets may
429    want to use it for their own versions of the __popcount builtins.  */
430 extern const UQItype __popcount_tab[256];
431
432 /* Defined for L_clz.  Exported here because some targets may want to use
433    it for their own versions of the __clz builtins.  It contains the bit
434    position of the first set bit for the numbers 0 - 255.  This avoids the
435    need for a separate table for the __ctz builtins.  */
436 extern const UQItype __clz_tab[256];
437
438 #include "longlong.h"
439
440 #undef int
441 extern int __clzDI2 (UDWtype);
442 extern int __clzSI2 (UWtype);
443 extern int __ctzSI2 (UWtype);
444 extern int __ffsSI2 (UWtype);
445 extern int __ffsDI2 (DWtype);
446 extern int __ctzDI2 (UDWtype);
447 extern int __popcountSI2 (UWtype);
448 extern int __popcountDI2 (UDWtype);
449 extern int __paritySI2 (UWtype);
450 extern int __parityDI2 (UDWtype);
451 #define int bogus_type
452
453 extern void __enable_execute_stack (void *);
454
455 #ifndef HIDE_EXPORTS
456 #pragma GCC visibility pop
457 #endif
458
459 #endif /* ! GCC_LIBGCC2_H */