[Bug fortran/27997] Fortran 2003: Support type-spec for array constructor

[burnus at gcc dot gnu dot org]

------- Comment #9 from burnus at gcc dot gnu dot org  2008-03-25 16:04 -------
Another test case, causes an ICE with another compiler, which supports the
first test case; I have not tested it with the current patch.

program test
  character(15) :: a(3)
  character(10), volatile :: b(3)
  b(1) = 'Takata'
  b(2) = 'Tanaka'
  b(3) = 'Hayashi'
  a =  (/ character(len=7) :: trim(b(1)), trim(b(2)), trim(b(3)) /)
  print '(a)',a
  a =  (/ character(len=2) :: trim(b(1)), trim(b(2)), trim(b(3)) /)
  print '(a)',a
  a =  (/ character(len=8) :: trim(b(1)), trim(b(2)), trim(b(3)) /)
  print '(a)',a
end program test


-- 


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