[Bug tree-optimization/19042] Complex types are not SRA all the time.

[pinskia at gcc dot gnu dot org]

------- Additional Comments From pinskia at gcc dot gnu dot org  2004-12-16 
20:38 -------
Here it is further reduced:
      COMMON TA(6,6)                                
      COMPLEX*16 CA2,CLAM2                                                      
              

      CA2=DCMPLX(F2,ZERO)                                                       
      CLAM2=(EGWG2+CA2)/TWO                      

      DO 40 I=1,4                                                               
      TA(I,3)=DREAL(CLAM2)                                                      
 
   40 CONTINUE                                                                  
                                                                                
        
      RETURN                                                                    
                                                               
      END                                                                       


-- 


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