diff options
| author | jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-02-06 17:45:00 +0000 |
|---|---|---|
| committer | jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-02-06 17:45:00 +0000 |
| commit | 4257b08ac98649a47bc2a994fee00281baffbd06 (patch) | |
| tree | e8246f6bbbc449d315d9ddbf1bacb459740fd188 /gcc/config/s390/s390.c | |
| parent | cf4145e2aed5ec2320929550e473d77c3d2090e0 (diff) | |
| download | gcc-4257b08ac98649a47bc2a994fee00281baffbd06.tar.gz | |
2006-02-06 Aldy Hernandez <aldyh@redhat.com>
* config/s390/s390.c (TARGET_MANGLE_FUNDAMENTAL_TYPE): Define.
(s390_mangle_fundamental_type): New.
* config/s390/linux.h (TARGET_ALTERNATE_LONG_DOUBLE_MANGLING):
Define.
* config/alpha/alpha.c (TARGET_MANGLE_FUNDAMENTAL_TYPE): Define.
(alpha_mangle_fundamental_type): New.
* config/alpha/linux.h (TARGET_ALTERNATE_LONG_DOUBLE_MANGLING):
Define.
* config/sparc/linux.h (TARGET_ALTERNATE_LONG_DOUBLE_MANGLING):
Define.
* config/sparc/linux64.h (TARGET_ALTERNATE_LONG_DOUBLE_MANGLING):
Define.
* config/sparc/sparc.c (TARGET_MANGLE_FUNDAMENTAL_TYPE): Define.
(sparc_mangle_fundamental_type): New.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@110655 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/config/s390/s390.c')
| -rw-r--r-- | gcc/config/s390/s390.c | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/gcc/config/s390/s390.c b/gcc/config/s390/s390.c index dfefaca21fc..bdf15125541 100644 --- a/gcc/config/s390/s390.c +++ b/gcc/config/s390/s390.c @@ -4293,6 +4293,21 @@ s390_output_dwarf_dtprel (FILE *file, int size, rtx x) fputs ("@DTPOFF", file); } +#ifdef TARGET_ALTERNATE_LONG_DOUBLE_MANGLING +/* Implement TARGET_MANGLE_FUNDAMENTAL_TYPE. */ + +static const char * +s390_mangle_fundamental_type (tree type) +{ + if (TYPE_MAIN_VARIANT (type) == long_double_type_node + && TARGET_LONG_DOUBLE_128) + return "g"; + + /* For all other types, use normal C++ mangling. */ + return NULL; +} +#endif + /* In the name of slightly smaller debug output, and to cater to general assembler lossage, recognize various UNSPEC sequences and turn them back into a direct symbol reference. */ @@ -9185,6 +9200,11 @@ s390_reorg (void) #define TARGET_ASM_OUTPUT_DWARF_DTPREL s390_output_dwarf_dtprel #endif +#ifdef TARGET_ALTERNATE_LONG_DOUBLE_MANGLING +#undef TARGET_MANGLE_FUNDAMENTAL_TYPE +#define TARGET_MANGLE_FUNDAMENTAL_TYPE s390_mangle_fundamental_type +#endif + struct gcc_target targetm = TARGET_INITIALIZER; #include "gt-s390.h" |