[Bug middle-end/91512] [10 Regression] Fortran compile time regression.

[tkoenig at gcc dot gnu.org]

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

--- Comment #10 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---

> Yes, but in the WRF file I see no assumed-shape arrays but all
> appear to be of dimension(low:high,...) style.

One or two dimensional?

Code like

  subroutine foo(a)
  real, intent(in), dimension(*) :: a
  end subroutine foo

  real, dimension(n,m) :: a
  call foo(a(low:high,low2,high2))

will also trigger a repack, because foo expects
a contiguous memory argument.

Code like

  real, dimension(10) :: a
  call foo(a(from:to))

should not repack, because the memory is contiguous.