1 // PR 24365 2 // { dg-do compile } 3 // { dg-options "-O2" } 4 5 typedef __complex__ double cdouble; to_complex(double r)6inline cdouble to_complex(double r) { 7 cdouble z; 8 __real__ z = r; 9 return z; 10 } elt_zero()11cdouble elt_zero() { 12 cdouble a = to_complex(0.0); 13 a+=1.0; 14 return a; 15 } 16 17