OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

(sparc_type_code): Return reasonable result for COMPLEX_TYPE.

Browse Source 
From-SVN: r2388
This commit is contained in:
Jim Wilson 1992-10-09 15:10:02 -07:00
parent 03da3e3b47
commit c82aa69aa3
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/config/sparc/sparc.c
View File

@ -3020,6 +3020,11 @@ sparc_type_code (type)
abort (); abort ();
case COMPLEX_TYPE: /* GNU Fortran COMPLEX type. */ 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 CHAR_TYPE: /* GNU Pascal CHAR type. Not used in C. */
case BOOLEAN_TYPE: /* GNU Fortran BOOLEAN type. */ case BOOLEAN_TYPE: /* GNU Fortran BOOLEAN type. */
case FILE_TYPE: /* GNU Pascal FILE type. */ case FILE_TYPE: /* GNU Pascal FILE type. */