[Bug fortran/31608] wrong types in character array/scalar binop

[dominiq at lps dot ens dot fr]

------- Comment #24 from dominiq at lps dot ens dot fr  2007-10-06 21:47 -------
The patch in comment #22 fixes the 3 PR's, but cause a quite massive regression
on my tests, for instance:

INTEGER :: I
CHARACTER(LEN=100) :: data="1.0 3.0"
REAL :: C,D
READ(data,*) C,D
I=TRANSFER(C/D,I)
SELECT CASE(I)
CASE (TRANSFER(1.0/3.0,1))
CASE DEFAULT
 CALL ABORT()
END SELECT
END

now gives

pr31216.f90:5: internal compiler error: Segmentation Fault

and so on. I did not have the time to comb the regressions, but for 3 ICE's
fixed I have15 new ones.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31608