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

--- Comment #3 from Harald Anlauf <anlauf at gmx dot de> ---
Even simpler:

  integer :: i
  print *, 1 +    (/ (i, i=1,0) /)             ! OK
  print *, 1 + (/ (/ (i, i=1,0) /) /)          ! Error
  end

pr65428.f90:3:10:

   print *, 1 + (/ (/ (i, i=1,0) /) /)          ! Error
          1
Error: Operands of binary numeric operator '+' at (1) are INTEGER(4)/UNKNOWN

Reply via email to