[Bug fortran/32195] [regression] ICE in get_array_ctor_strlen

["dominiq at lps dot ens dot fr" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #1 from dominiq at lps dot ens dot fr  2007-06-04 11:25 -------
As far as I can tell this bug seems to affect only darwin7.

The ICE occurs with RESHAPE and EOSHIFT with character arrays and a third
optional argument:

The following code

  character(len=1) :: tempn(1,2)
  character(len=1),allocatable :: foo(:,:), bar(:,:)
  integer :: tempi(1,2)
  tempn = 'a'
  tempi = 1
  x = 0
  allocate(foo(3,0),bar(-2:-4,7:9))
  print *, reshape(tempn(:,:),(/2,1/))
  print *, reshape((/1,2,3,4,5,6/),(/3,5/),(/-1,-2/),(/2,1/))
  print *, reshape((/'A','B','C','D','E','F','G','H','I','J','K','L'/),
(/3,5/),order=(/2,1/),pad=(/'a'/))
  print *, eoshift(tempi,(/1,1/),boundary=(/2,3/))
!  print *, eoshift(tempn,(/1,1/),boundary=(/'b','c'/))
  print *, reshape(tempi,(/3,3/),order=(/1,2/),pad=(/2/))
!  print *, reshape(tempn,(/3,3/),order=(/1,2/),pad=(/'b'/))
  end

compiles fine, but any of the commented lines trigger the ICE.
Does it ring some bell?


-- 


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