Array constructors do not work

Dear all,

the following code fails (with version 21.7):

  program main
  integer :: n(2,1)
  n(:,1) = (/ 2,2 /)
  write(*,*) ( sum( (/ (n(l,i),l=1,2) /) ),i=1,1)
  write(*,*) (/ ( sum( (/ (n(l,i),l=1,2) /) ),i=1,1) /)
  j = maxval((/ ( sum( (/ (n(l,i),l=1,2) /) ),i=1,1) /))
  write(*,*) j
  end 

The output is:
4
0
0
But it should be:
4
4
4
(GFortran, Intel Fortran, etc. work correctly.)

Thank you.

Regards
Christoph

Hi Cristoph,

It appears that you’ve already submitted this issue to NVBUGs and our engineers have received it.

Thanks for the report,
Mat