https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67542
--- Comment #4 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
The ICE from above is gone a while ago.
$ gfortran-6 --version
GNU Fortran (SUSE Linux) 6.1.1 20160502 [gcc-6-branch revision 235698]
$ gfortran-6 -g -O0 -Wall -fcheck=all z1.f90
z1.f90:6:15:
type(t) :: x = t(1, ['a'])
1
Warning: Unused variable ‘x’ declared at (1) [-Wunused-variable]
z1.f90:7:15:
type(t) :: y = t(2, ['a', 'b'])
1
Warning: Unused variable ‘y’ declared at (1) [-Wunused-variable]
---
$ cat z3.f90
program p
character(1), parameter :: a(4) = ['a','b','c','d']
type t
integer :: n
character(2) :: c(3)
end type
type(t) :: x = t(1, a(1:2))
type(t) :: y = t(2, a(1:4))
type(t) :: z = t(3, a)
print *, x
print *, y
print *, z
end
$ gfortran-6 -g -O0 -Wall -fcheck=all z3.f90
$ a.out
1 a b
2 a b c
3 a b c
