[Bug fortran/19479] New: UBOUND causes ICE

[lei at il dot ibm dot com]

subroutine fft(tab)
  type fft_tab_type  
     complex, dimension(:), pointer :: omega
  end type fft_tab_type

  type(fft_tab_type), intent(in) :: tab
  i = ubound(tab%omega,1)
end subroutine fft

cd /home/lei/SPEC2004/benchspec/CPU2004/459.GemsFDTD/run/00000001/
~/gcc/bin/gfortran -O0 -c bugreport.f90
bugreport.f90:0: internal compiler error: Segmentation fault

-- 
           Summary: UBOUND causes ICE
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: lei at il dot ibm dot com
                CC: gcc-bugs at gcc dot gnu dot org


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