diff options
| author | Jim Wilson <wilson@cygnus.com> | 2000-03-20 23:50:48 +0000 |
|---|---|---|
| committer | Jim Wilson <wilson@gcc.gnu.org> | 2000-03-20 15:50:48 -0800 |
| commit | d60c4c11a6144244519f3763417239fd9bc2e6e4 (patch) | |
| tree | 484d1dd473a36ceebf7f591747723ea570cdc3d9 /gcc | |
| parent | 1c882ea4e71916155a8e51691c816efcf540c8c9 (diff) | |
| download | gcc-d60c4c11a6144244519f3763417239fd9bc2e6e4.zip gcc-d60c4c11a6144244519f3763417239fd9bc2e6e4.tar.gz gcc-d60c4c11a6144244519f3763417239fd9bc2e6e4.tar.bz2 | |
Add ia64 support.
* f/target.h (FFETARGET_32bit_longs): New. Define for alpha, sparc64,
and ia64.
(ffetargetInteger1, ffetargetLogical1, ffetargetReal1, ffetargetReal2,
ffetarget_integerdefault_is_magical): Use FFETARGET_32bit_longs.
From-SVN: r32658
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/f/ChangeLog | 7 | ||||
| -rw-r--r-- | gcc/f/target.h | 14 |
2 files changed, 16 insertions, 5 deletions
diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog index 2524c56..827142b 100644 --- a/gcc/f/ChangeLog +++ b/gcc/f/ChangeLog @@ -1,3 +1,10 @@ +Mon Mar 20 15:49:40 2000 Jim Wilson <wilson@cygnus.com> + + * f/target.h (FFETARGET_32bit_longs): New. Define for alpha, sparc64, + and ia64. + (ffetargetInteger1, ffetargetLogical1, ffetargetReal1, ffetargetReal2, + ffetarget_integerdefault_is_magical): Use FFETARGET_32bit_longs. + Fri Mar 10 00:43:55 2000 Jason Merrill <jason@casey.cygnus.com> * com.c (ffecom_stabilize_aggregate_): Don't refer to TREE_RAISES. diff --git a/gcc/f/target.h b/gcc/f/target.h index 810e76a..4efc973 100644 --- a/gcc/f/target.h +++ b/gcc/f/target.h @@ -234,6 +234,10 @@ the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA #define FFETARGET_f2cTYLOGICAL2 13 #define FFETARGET_f2cTYQUAD 14 +#if !defined(__alpha__) && (!defined(__sparc__) || (!defined(__sparcv9) && !defined(__arch64__))) && (!defined(__ia64__) || !defined(__LP64__)) +#define FFETARGET_32bit_longs +#endif + /* Typedefs. */ typedef unsigned char ffetargetAlign; /* ffetargetOffset for alignment. */ @@ -247,7 +251,7 @@ typedef long long ffetargetOffset; #define ffetargetOffset_f "ll" #if FFETARGET_okINTEGER1 -#if !defined(__alpha__) && (!defined(__sparc__) || (!defined(__sparcv9) && !defined(__arch64__))) +#ifdef FFETARGET_32bit_longs typedef long int ffetargetInteger1; #define ffetargetInteger1_f "l" #else @@ -288,7 +292,7 @@ typedef ? ffetargetInteger8; ? #endif #if FFETARGET_okLOGICAL1 -#if !defined(__alpha__) && (!defined(__sparc__) || (!defined(__sparcv9) && !defined(__arch64__))) +#ifdef FFETARGET_32bit_longs typedef long int ffetargetLogical1; #define ffetargetLogical1_f "l" #else @@ -330,7 +334,7 @@ typedef ? ffetargetLogical8; #endif #if FFETARGET_okREAL1 #ifdef REAL_ARITHMETIC -#if !defined(__alpha__) && (!defined(__sparc__) || (!defined(__sparcv9) && !defined(__arch64__))) +#ifdef FFETARGET_32bit_longs typedef long int ffetargetReal1; #define ffetargetReal1_f "l" #define ffetarget_cvt_r1_to_rv_ REAL_VALUE_UNTO_TARGET_SINGLE @@ -354,7 +358,7 @@ typedef float ffetargetReal1; #endif #if FFETARGET_okREAL2 #ifdef REAL_ARITHMETIC -#if !defined(__alpha__) && (!defined(__sparc__) || (!defined(__sparcv9) && !defined(__arch64__))) +#ifdef FFETARGET_32bit_longs typedef struct { long int v[2]; @@ -1496,7 +1500,7 @@ void *ffetarget_memcpy_ (void *dst, void *src, size_t len); #define ffetarget_init_2() #define ffetarget_init_3() #define ffetarget_init_4() -#if !defined(__alpha__) && (!defined(__sparc__) || (!defined(__sparcv9) && !defined(__arch64__))) +#ifdef FFETARGET_32bit_longs #define ffetarget_integerdefault_is_magical(i) \ (((unsigned long int) i) == FFETARGET_integerBIG_MAGICAL) #else |