diff options
| -rw-r--r-- | gcc/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/libgcc2.c | 202 | ||||
| -rw-r--r-- | gcc/libgcc2.h | 292 |
3 files changed, 300 insertions, 199 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 5e2f966..0470a0b 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +2000-03-08 Kaveh R. Ghazi <ghazi@caip.rutgers.edu> + + * libgcc2.h: New file. + * libgcc2.c: Move macros, typedefs and prototypes to libgcc2.h. + Wed Mar 8 16:19:42 2000 Jim Wilson <wilson@cygnus.com> * configure.in (ia64*-*-elf*, ia64*-*-linux*): New. diff --git a/gcc/libgcc2.c b/gcc/libgcc2.c index 368b5c6..e2a852c 100644 --- a/gcc/libgcc2.c +++ b/gcc/libgcc2.c @@ -49,182 +49,7 @@ Boston, MA 02111-1307, USA. */ #define inhibit_libc #endif -/* Permit the tm.h file to select the endianness to use just for this - file. This is used when the endianness is determined when the - compiler is run. */ - -#ifndef LIBGCC2_WORDS_BIG_ENDIAN -#define LIBGCC2_WORDS_BIG_ENDIAN WORDS_BIG_ENDIAN -#endif - -#ifndef LIBGCC2_LONG_DOUBLE_TYPE_SIZE -#define LIBGCC2_LONG_DOUBLE_TYPE_SIZE LONG_DOUBLE_TYPE_SIZE -#endif - -/* In the first part of this file, we are interfacing to calls generated - by the compiler itself. These calls pass values into these routines - which have very specific modes (rather than very specific types), and - these compiler-generated calls also expect any return values to have - very specific modes (rather than very specific types). Thus, we need - to avoid using regular C language type names in this part of the file - because the sizes for those types can be configured to be anything. - Instead we use the following special type names. */ - -typedef int QItype __attribute__ ((mode (QI))); -typedef unsigned int UQItype __attribute__ ((mode (QI))); -typedef int HItype __attribute__ ((mode (HI))); -typedef unsigned int UHItype __attribute__ ((mode (HI))); -#if UNITS_PER_WORD > 1 -/* These typedefs are usually forbidden on dsp's with UNITS_PER_WORD 1 */ -typedef int SItype __attribute__ ((mode (SI))); -typedef unsigned int USItype __attribute__ ((mode (SI))); -#if UNITS_PER_WORD > 2 -/* These typedefs are usually forbidden on archs with UNITS_PER_WORD 2 */ -typedef int DItype __attribute__ ((mode (DI))); -typedef unsigned int UDItype __attribute__ ((mode (DI))); -#endif -#endif - -#if BITS_PER_UNIT == 8 - -typedef float SFtype __attribute__ ((mode (SF))); -typedef float DFtype __attribute__ ((mode (DF))); - -#if LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 96 -typedef float XFtype __attribute__ ((mode (XF))); -#endif -#if LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 128 -typedef float TFtype __attribute__ ((mode (TF))); -#endif - -#else /* BITS_PER_UNIT != 8 */ - -/* On dsp's there are usually qf/hf/tqf modes used instead of the above. - For now we don't support them in libgcc2.c. */ - -#undef L_fixdfdi -#undef L_fixsfdi -#undef L_fixtfdi -#undef L_fixunsdfdi -#undef L_fixunsdfsi -#undef L_fixunssfdi -#undef L_fixunssfsi -#undef L_fixunstfdi -#undef L_fixunsxfdi -#undef L_fixunsxfsi -#undef L_fixxfdi -#undef L_floatdidf -#undef L_floatdisf -#undef L_floatditf -#undef L_floatdixf - -#endif /* BITS_PER_UNIT != 8 */ - -typedef int word_type __attribute__ ((mode (__word__))); - -/* Make sure that we don't accidentally use any normal C language built-in - type names in the first part of this file. Instead we want to use *only* - the type names defined above. The following macro definitions insure - that if we *do* accidentally use some normal C language built-in type name, - we will get a syntax error. */ - -#define char bogus_type -#define short bogus_type -#define int bogus_type -#define long bogus_type -#define unsigned bogus_type -#define float bogus_type -#define double bogus_type - -#if UNITS_PER_WORD > 2 -#define W_TYPE_SIZE (4 * BITS_PER_UNIT) -#define Wtype SItype -#define UWtype USItype -#define HWtype SItype -#define UHWtype USItype -#define DWtype DItype -#define UDWtype UDItype -#define __NW(a,b) __ ## a ## si ## b -#define __NDW(a,b) __ ## a ## di ## b -#elif UNITS_PER_WORD > 1 -#define W_TYPE_SIZE (2 * BITS_PER_UNIT) -#define Wtype HItype -#define UWtype UHItype -#define HWtype HItype -#define UHWtype UHItype -#define DWtype SItype -#define UDWtype USItype -#define __NW(a,b) __ ## a ## hi ## b -#define __NDW(a,b) __ ## a ## si ## b -#else -#define W_TYPE_SIZE BITS_PER_UNIT -#define Wtype QItype -#define UWtype UQItype -#define HWtype QItype -#define UHWtype UQItype -#define DWtype HItype -#define UDWtype UHItype -#define __NW(a,b) __ ## a ## qi ## b -#define __NDW(a,b) __ ## a ## hi ## b -#endif - -#define __muldi3 __NDW(mul,3) -#define __divdi3 __NDW(div,3) -#define __udivdi3 __NDW(udiv,3) -#define __moddi3 __NDW(mod,3) -#define __umoddi3 __NDW(umod,3) -#define __negdi2 __NDW(neg,2) -#define __lshrdi3 __NDW(lshr,3) -#define __ashldi3 __NDW(ashl,3) -#define __ashrdi3 __NDW(ashr,3) -#define __ffsdi2 __NDW(ffs,2) -#define __cmpdi2 __NDW(cmp,2) -#define __ucmpdi2 __NDW(ucmp,2) -#define __udivmoddi4 __NDW(udivmod,4) -#define __fixunstfdi __NDW(fixunstf,) -#define __fixtfdi __NDW(fixtf,) -#define __fixunsxfdi __NDW(fixunsxf,) -#define __fixxfdi __NDW(fixxf,) -#define __fixunsdfdi __NDW(fixunsdf,) -#define __fixdfdi __NDW(fixdf,) -#define __fixunssfdi __NDW(fixunssf,) -#define __fixsfdi __NDW(fixsf,) -#define __floatdixf __NDW(float,xf) -#define __floatditf __NDW(float,tf) -#define __floatdidf __NDW(float,df) -#define __floatdisf __NDW(float,sf) -#define __fixunsxfsi __NW(fixunsxf,) -#define __fixunstfsi __NW(fixunstf,) -#define __fixunsdfsi __NW(fixunsdf,) -#define __fixunssfsi __NW(fixunssf,) - -/* DWstructs are pairs of Wtype values in the order determined by - LIBGCC2_WORDS_BIG_ENDIAN. */ - -#if LIBGCC2_WORDS_BIG_ENDIAN - struct DWstruct {Wtype high, low;}; -#else - struct DWstruct {Wtype low, high;}; -#endif - -/* We need this union to unpack/pack DImode values, since we don't have - any arithmetic yet. Incoming DImode parameters are stored into the - `ll' field, and the unpacked result is read from the struct `s'. */ - -typedef union -{ - struct DWstruct s; - DWtype ll; -} DWunion; - -#if (defined (L_udivmoddi4) || defined (L_muldi3) || defined (L_udiv_w_sdiv)\ - || defined (L_divdi3) || defined (L_udivdi3) \ - || defined (L_moddi3) || defined (L_umoddi3)) - -#include "longlong.h" - -#endif /* udiv or mul */ - +#include "libgcc2.h" #if defined (L_negdi2) || defined (L_divdi3) || defined (L_moddi3) #if defined (L_divdi3) || defined (L_moddi3) @@ -871,8 +696,6 @@ __fixunstfdi (TFtype a) #endif #if defined(L_fixtfdi) && (LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 128) -extern DWtype __fixunstfdi (TFtype a); - DWtype __fixtfdi (TFtype a) { @@ -915,8 +738,6 @@ __fixunsxfdi (XFtype a) #endif #if defined(L_fixxfdi) && (LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 96) -extern DWtype __fixunsxfdi (XFtype a); - DWtype __fixxfdi (XFtype a) { @@ -959,8 +780,6 @@ __fixunsdfdi (DFtype a) #endif #ifdef L_fixdfdi -extern DWtype __fixunsdfdi (DFtype a); - DWtype __fixdfdi (DFtype a) { @@ -1007,8 +826,6 @@ __fixunssfdi (SFtype original_a) #endif #ifdef L_fixsfdi -extern DWtype __fixunssfdi (SFtype a); - DWtype __fixsfdi (SFtype a) { @@ -1239,7 +1056,7 @@ __fixunssfsi (SFtype a) positive if S1 is greater, 0 if S1 and S2 are equal. */ int -__gcc_bcmp (unsigned char *s1, unsigned char *s2, size_t size) +__gcc_bcmp (const unsigned char *s1, const unsigned char *s2, size_t size) { while (size > 0) { @@ -1470,7 +1287,7 @@ asm ("___builtin_saveregs:"); asm (" .end __builtin_saveregs"); #else /* not __mips__, etc. */ -void * +void * __attribute__ ((__noreturn__)) __builtin_saveregs (void) { abort (); @@ -1487,9 +1304,6 @@ __builtin_saveregs (void) #undef NULL /* Avoid errors if stdio.h and our stddef.h mismatch. */ #include <stdio.h> /* This is used by the `assert' macro. */ -extern void __eprintf (const char *, const char *, unsigned int, const char *) - __attribute__ ((__noreturn__)); - void __eprintf (const char *string, const char *expression, unsigned int line, const char *filename) @@ -3166,8 +2980,6 @@ atexit (func_ptr func) /* Shared exception handling support routines. */ -extern void __default_terminate (void) __attribute__ ((__noreturn__)); - void __default_terminate (void) { @@ -3210,8 +3022,6 @@ __empty (void) /* Allocate and return a new EH context structure. */ -extern void __throw (void); - #if __GTHREADS static void * new_eh_context (void) @@ -3410,8 +3220,6 @@ __get_dynamic_handler_chain (void) dynamic handler chain, and use longjmp to transfer back to the associated handler. */ -extern void __sjthrow (void) __attribute__ ((__noreturn__)); - void __sjthrow (void) { @@ -3485,8 +3293,6 @@ __sjthrow (void) then throw. This is used to skip the first handler, and transfer control to the next handler in the dynamic handler stack. */ -extern void __sjpopnthrow (void) __attribute__ ((__noreturn__)); - void __sjpopnthrow (void) { @@ -4153,8 +3959,6 @@ label: #define MESSAGE "pure virtual method called\n" -extern void __terminate (void) __attribute__ ((__noreturn__)); - void __pure_virtual (void) { diff --git a/gcc/libgcc2.h b/gcc/libgcc2.h new file mode 100644 index 0000000..ca5b541 --- /dev/null +++ b/gcc/libgcc2.h @@ -0,0 +1,292 @@ +/* Header file for libgcc2.c. */ +/* Copyright (C) 2000 + Free Software Foundation, Inc. + +This file is part of GNU CC. + +GNU CC is free software; you can redistribute it and/or modify +it under the terms of the GNU General Public License as published by +the Free Software Foundation; either version 2, or (at your option) +any later version. + +GNU CC is distributed in the hope that it will be useful, +but WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +GNU General Public License for more details. + +You should have received a copy of the GNU General Public License +along with GNU CC; see the file COPYING. If not, write to +the Free Software Foundation, 59 Temple Place - Suite 330, +Boston, MA 02111-1307, USA. */ + +/* As a special exception, if you link this library with other files, + some of which are compiled with GCC, to produce an executable, + this library does not by itself cause the resulting executable + to be covered by the GNU General Public License. + This exception does not however invalidate any other reasons why + the executable file might be covered by the GNU General Public License. */ + +#ifndef __LIBGCC2_H__ +#define __LIBGCC2_H__ + +extern int __gcc_bcmp (const unsigned char *, const unsigned char *, size_t); +extern void *__builtin_saveregs (void); +extern void __dummy (void); +extern void __clear_cache (char *, char *); +extern void __pure_virtual (void) __attribute__ ((__noreturn__)); +extern void __terminate (void) __attribute__ ((__noreturn__)); +extern void __default_terminate (void) __attribute__ ((__noreturn__)); +extern void *__throw_type_match (void *, void *, void *); +extern void __empty (void); +extern void *__get_eh_context (void); +extern void **__get_eh_info (void); +extern void ***__get_dynamic_handler_chain (void); +extern int __eh_rtime_match (void *); +extern void __unwinding_cleanup (void); +extern void __rethrow (void *); +extern void __throw (void); +extern void __sjthrow (void) __attribute__ ((__noreturn__)); +extern void __sjpopnthrow (void) __attribute__ ((__noreturn__)); +extern void __eprintf (const char *, const char *, unsigned int, const char *) + __attribute__ ((__noreturn__)); + +struct bb; +extern void __bb_exit_func (void); +extern void __bb_init_func (struct bb *); +extern void __bb_fork_func (void); +extern void __bb_trace_func (void); +extern void __bb_trace_ret (void); +extern void __bb_init_trace_func (struct bb *, unsigned long); + +struct exception_descriptor; +extern short int __get_eh_table_language (struct exception_descriptor *); +extern short int __get_eh_table_version (struct exception_descriptor *); + +/* Permit the tm.h file to select the endianness to use just for this + file. This is used when the endianness is determined when the + compiler is run. */ + +#ifndef LIBGCC2_WORDS_BIG_ENDIAN +#define LIBGCC2_WORDS_BIG_ENDIAN WORDS_BIG_ENDIAN +#endif + +#ifndef LIBGCC2_LONG_DOUBLE_TYPE_SIZE +#define LIBGCC2_LONG_DOUBLE_TYPE_SIZE LONG_DOUBLE_TYPE_SIZE +#endif + +/* In the first part of this file, we are interfacing to calls generated + by the compiler itself. These calls pass values into these routines + which have very specific modes (rather than very specific types), and + these compiler-generated calls also expect any return values to have + very specific modes (rather than very specific types). Thus, we need + to avoid using regular C language type names in this part of the file + because the sizes for those types can be configured to be anything. + Instead we use the following special type names. */ + +typedef int QItype __attribute__ ((mode (QI))); +typedef unsigned int UQItype __attribute__ ((mode (QI))); +typedef int HItype __attribute__ ((mode (HI))); +typedef unsigned int UHItype __attribute__ ((mode (HI))); +#if UNITS_PER_WORD > 1 +/* These typedefs are usually forbidden on dsp's with UNITS_PER_WORD 1 */ +typedef int SItype __attribute__ ((mode (SI))); +typedef unsigned int USItype __attribute__ ((mode (SI))); +#if UNITS_PER_WORD > 2 +/* These typedefs are usually forbidden on archs with UNITS_PER_WORD 2 */ +typedef int DItype __attribute__ ((mode (DI))); +typedef unsigned int UDItype __attribute__ ((mode (DI))); +#endif +#endif + +#if BITS_PER_UNIT == 8 + +typedef float SFtype __attribute__ ((mode (SF))); +typedef float DFtype __attribute__ ((mode (DF))); + +#if LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 96 +typedef float XFtype __attribute__ ((mode (XF))); +#endif +#if LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 128 +typedef float TFtype __attribute__ ((mode (TF))); +#endif + +#else /* BITS_PER_UNIT != 8 */ + +/* On dsp's there are usually qf/hf/tqf modes used instead of the above. + For now we don't support them in libgcc2.c. */ + +#undef L_fixdfdi +#undef L_fixsfdi +#undef L_fixtfdi +#undef L_fixunsdfdi +#undef L_fixunsdfsi +#undef L_fixunssfdi +#undef L_fixunssfsi +#undef L_fixunstfdi +#undef L_fixunsxfdi +#undef L_fixunsxfsi +#undef L_fixxfdi +#undef L_floatdidf +#undef L_floatdisf +#undef L_floatditf +#undef L_floatdixf + +#endif /* BITS_PER_UNIT != 8 */ + +typedef int word_type __attribute__ ((mode (__word__))); + +/* Make sure that we don't accidentally use any normal C language built-in + type names in the first part of this file. Instead we want to use *only* + the type names defined above. The following macro definitions insure + that if we *do* accidentally use some normal C language built-in type name, + we will get a syntax error. */ + +#define char bogus_type +#define short bogus_type +#define int bogus_type +#define long bogus_type +#define unsigned bogus_type +#define float bogus_type +#define double bogus_type + +#if UNITS_PER_WORD > 2 +#define W_TYPE_SIZE (4 * BITS_PER_UNIT) +#define Wtype SItype +#define UWtype USItype +#define HWtype SItype +#define UHWtype USItype +#define DWtype DItype +#define UDWtype UDItype +#define __NW(a,b) __ ## a ## si ## b +#define __NDW(a,b) __ ## a ## di ## b +#elif UNITS_PER_WORD > 1 +#define W_TYPE_SIZE (2 * BITS_PER_UNIT) +#define Wtype HItype +#define UWtype UHItype +#define HWtype HItype +#define UHWtype UHItype +#define DWtype SItype +#define UDWtype USItype +#define __NW(a,b) __ ## a ## hi ## b +#define __NDW(a,b) __ ## a ## si ## b +#else +#define W_TYPE_SIZE BITS_PER_UNIT +#define Wtype QItype +#define UWtype UQItype +#define HWtype QItype +#define UHWtype UQItype +#define DWtype HItype +#define UDWtype UHItype +#define __NW(a,b) __ ## a ## qi ## b +#define __NDW(a,b) __ ## a ## hi ## b +#endif + +#define __muldi3 __NDW(mul,3) +#define __divdi3 __NDW(div,3) +#define __udivdi3 __NDW(udiv,3) +#define __moddi3 __NDW(mod,3) +#define __umoddi3 __NDW(umod,3) +#define __negdi2 __NDW(neg,2) +#define __lshrdi3 __NDW(lshr,3) +#define __ashldi3 __NDW(ashl,3) +#define __ashrdi3 __NDW(ashr,3) +#define __ffsdi2 __NDW(ffs,2) +#define __cmpdi2 __NDW(cmp,2) +#define __ucmpdi2 __NDW(ucmp,2) +#define __udivmoddi4 __NDW(udivmod,4) +#define __fixunstfdi __NDW(fixunstf,) +#define __fixtfdi __NDW(fixtf,) +#define __fixunsxfdi __NDW(fixunsxf,) +#define __fixxfdi __NDW(fixxf,) +#define __fixunsdfdi __NDW(fixunsdf,) +#define __fixdfdi __NDW(fixdf,) +#define __fixunssfdi __NDW(fixunssf,) +#define __fixsfdi __NDW(fixsf,) +#define __floatdixf __NDW(float,xf) +#define __floatditf __NDW(float,tf) +#define __floatdidf __NDW(float,df) +#define __floatdisf __NDW(float,sf) +#define __fixunsxfsi __NW(fixunsxf,) +#define __fixunstfsi __NW(fixunstf,) +#define __fixunsdfsi __NW(fixunsdf,) +#define __fixunssfsi __NW(fixunssf,) + +/* DWstructs are pairs of Wtype values in the order determined by + LIBGCC2_WORDS_BIG_ENDIAN. */ + +#if LIBGCC2_WORDS_BIG_ENDIAN + struct DWstruct {Wtype high, low;}; +#else + struct DWstruct {Wtype low, high;}; +#endif + +/* We need this union to unpack/pack DImode values, since we don't have + any arithmetic yet. Incoming DImode parameters are stored into the + `ll' field, and the unpacked result is read from the struct `s'. */ + +typedef union +{ + struct DWstruct s; + DWtype ll; +} DWunion; + +#if (defined (L_udivmoddi4) || defined (L_muldi3) || defined (L_udiv_w_sdiv)\ + || defined (L_divdi3) || defined (L_udivdi3) \ + || defined (L_moddi3) || defined (L_umoddi3)) + +#include "longlong.h" + +#endif /* udiv or mul */ + +extern DWtype __muldi3 (DWtype, DWtype); +extern DWtype __divdi3 (DWtype, DWtype); +extern UDWtype __udivdi3 (UDWtype, UDWtype); +extern UDWtype __umoddi3 (UDWtype, UDWtype); +extern DWtype __moddi3 (DWtype, DWtype); +/* __udivmoddi4 is static inline when building other libgcc2 portions. */ +#if (!defined (L_udivdi3) && !defined (L_divdi3) && \ + !defined (L_umoddi3) && !defined (L_moddi3)) +extern UDWtype __udivmoddi4 (UDWtype, UDWtype, UDWtype *); +#endif + +/* __negdi2 is static inline when building other libgcc2 portions. */ +#if !defined(L_divdi3) && !defined(L_moddi3) +extern DWtype __negdi2 (DWtype); +#endif + +extern DWtype __lshrdi3 (DWtype, word_type); +extern DWtype __ashldi3 (DWtype, word_type); +extern DWtype __ashrdi3 (DWtype, word_type); +extern DWtype __ffsdi2 (DWtype); + +/* __udiv_w_sdiv is static inline when building other libgcc2 portions. */ +#if (!defined(L_udivdi3) && !defined(L_divdi3) && \ + !defined(L_umoddi3) && !defined(L_moddi3)) +extern UWtype __udiv_w_sdiv (UWtype *, UWtype, UWtype, UWtype); +#endif + +extern word_type __cmpdi2 (DWtype, DWtype); +extern word_type __ucmpdi2 (DWtype, DWtype); +extern DFtype __floatdidf (DWtype); +extern SFtype __floatdisf (DWtype); +extern UWtype __fixunsdfsi (DFtype); +extern UWtype __fixunssfsi (SFtype); +extern DWtype __fixunsdfdi (DFtype); +extern DWtype __fixdfdi (DFtype); +extern DWtype __fixunssfdi (SFtype); +extern DWtype __fixsfdi (SFtype); + +#if LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 96 +extern DWtype __fixxfdi (XFtype); +extern DWtype __fixunsxfdi (XFtype); +extern XFtype __floatdixf (DWtype); +extern UWtype __fixunsxfsi (XFtype); +#endif + +#if LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 128 +extern DWtype __fixunstfdi (TFtype); +extern DWtype __fixtfdi (TFtype); +extern TFtype __floatditf (DWtype); +#endif + +#endif /* __LIBGCC2_H__ */ |