diff options
| author | Jim Wilson <wilson@gcc.gnu.org> | 1992-10-09 15:10:02 -0700 |
|---|---|---|
| committer | Jim Wilson <wilson@gcc.gnu.org> | 1992-10-09 15:10:02 -0700 |
| commit | c82aa69aa38c58458abb3b08785bc08e879aec9f (patch) | |
| tree | 2170f9226c63c0f3ce5ec2bbbef340a57c346287 | |
| parent | 03da3e3b47615e84809838a73e82d09bb50e5227 (diff) | |
| download | gcc-c82aa69aa38c58458abb3b08785bc08e879aec9f.zip gcc-c82aa69aa38c58458abb3b08785bc08e879aec9f.tar.gz gcc-c82aa69aa38c58458abb3b08785bc08e879aec9f.tar.bz2 | |
(sparc_type_code): Return reasonable result for COMPLEX_TYPE.
From-SVN: r2388
| -rw-r--r-- | gcc/config/sparc/sparc.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/config/sparc/sparc.c b/gcc/config/sparc/sparc.c index fe451f9..2a6bcd0 100644 --- a/gcc/config/sparc/sparc.c +++ b/gcc/config/sparc/sparc.c @@ -3020,6 +3020,11 @@ sparc_type_code (type) abort (); case COMPLEX_TYPE: /* GNU Fortran COMPLEX type. */ + /* ??? We need to dinguish between double and float complex types, + but I don't know how yet because I can't reach this code from + existing front-ends. */ + return (qualifiers | 7); /* Who knows? */ + case CHAR_TYPE: /* GNU Pascal CHAR type. Not used in C. */ case BOOLEAN_TYPE: /* GNU Fortran BOOLEAN type. */ case FILE_TYPE: /* GNU Pascal FILE type. */ |