Re: ICE on valid code, duplicate bug or new?

[Carsten Lemmen <c dot lemmen at fz-juelich dot de>]

Invalid code, blah needs to be integer-valued

SUBROUTINE GW_S_PARAMS
  IMPLICIT NONE

  REAL(KIND(1.0)), DIMENSION(6) :: ell
  REAL(KIND(1.0)), DIMENSION(3) :: ell_tri
  INTEGER, DIMENSION(3) :: blah


  ell_tri = ell(blah)

END SUBROUTINE GW_S_PARAMS

Cheers,
CL

Neilen Marais wrote:
> Hi!
>
> I'm getting the following ICE:
>
> $ gfortran -c -v -g +test.f90
> Using built-in specs.
> Target: i386-linux
> Configured with: ../gcc/configure --prefix=/tmp/gfortran-20050608/irun
> --enable-languages=c,f95 --host=i386-linux
> Thread model: posix
> gcc version 4.1.0 20050608 (experimental)
>  /usr/local/src/gfortran.2005.06.08/irun/bin/../libexec/gcc/i386-linux/4.1.0/f951 +test.f90 -quiet -dumpbase +test.f90 -auxbase +test -g -version -o /tmp/cckLsUNV.s
> GNU F95 version 4.1.0 20050608 (experimental) (i386-linux)
>         compiled by GNU C version 3.3.5 (Debian 1:3.3.5-13).
> GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
> +test.f90: In function âgw_s_paramsâ:
> +test.f90:1: internal compiler error: in fold_convert, at
> fold-const.c:1948
> Please submit a full bug report,
> with preprocessed source if appropriate.
> See <URL:http://gcc.gnu.org/bugs.html> for instructions.
>
> brick@wanbalans:~/akademie/FEMFEKO/src
> $ cat +test.f90
> SUBROUTINE GW_S_PARAMS
>   IMPLICIT NONE
>
>   REAL(KIND(1.0)), DIMENSION(6) :: ell
>   REAL(KIND(1.0)), DIMENSION(3) :: ell_tri, blah
>
>
>   ell_tri = ell(blah)
>
> END SUBROUTINE GW_S_PARAMS
>
> Anything strange with this code, or should I file a bug report? 
>
> Thanks
> Neilen

--