https://gcc.gnu.org/bugzilla/show_bug.cgi?id=55501

Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |gerhard.steinmetz.fortran@t
                   |                            |-online.de

--- Comment #16 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de> 
---
Update, running test from comment 13 :

$ gfortran-7 testmerge3.f90
testmerge3.f90:3:0:

   print "(a,99i2)",'i,iarray =',i,iarray

internal compiler error: in gfc_conv_expr_descriptor, at
fortran/trans-array.c:6737



It works with a separated extra parameter :

$ cat z1.f90
program p
  integer, parameter :: n = merge(2,3,.true.)
  integer, parameter :: iarray(n) = 1, i = size(iarray)
  print "(a,99i2)",'i,iarray =',i,iarray
end

$ gfortran-6 -g -O0 -Wall -fcheck=all z1.f90
$ a.out
i,iarray = 2 1 1

Reply via email to