------- Comment #10 from geir at cray dot com 2007-01-22 19:24 ------- Here is a Fortran test case:
$ cat bug2737.f90 PROGRAM get_tst_inc_complex implicit none external subrrg, checkrr complex :: vrr, trr vrr=cmplx(1.,2.); call subrr ( ) contains subroutine subrr () trr=vrr-(1.0,0.0) call checkrr (trr) return end subroutine subrr END $ gfortran --version GNU Fortran 95 (GCC) 4.1.1 20060524 (rpm:5) Copyright (C) 2006 Free Software Foundation, Inc. GNU Fortran comes with NO WARRANTY, to the extent permitted by law. You may redistribute copies of GNU Fortran under the terms of the GNU General Public License. For more information about these matters, see the file named COPYING $ gfortran -c -O0 bug2737.f90 $ gfortran -c -O1 bug2737.f90 bug2737.f90: In function 'MAIN__': bug2737.f90:1: internal compiler error: in find_lattice_value, at tree-complex.c:133 Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. $ -- geir at cray dot com changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |geir at cray dot com http://gcc.gnu.org/bugzilla/show_bug.cgi?id=30132