[all-commits] [llvm/llvm-project] 6a63e2: [flang] Fix rank and byte stride in pointer remapping

[Valentin Clement (バレンタイン クレメン) via All-commits]

  Branch: refs/heads/main
  Home:   https://github.com/llvm/llvm-project
  Commit: 6a63e21cf4e6a8499d90e2337eb545644646ee31
      https://github.com/llvm/llvm-project/commit/6a63e21cf4e6a8499d90e2337eb545644646ee31
  Author: Valentin Clement <clementval at gmail.com>
  Date:   2023-02-08 (Wed, 08 Feb 2023)

  Changed paths:
    M flang/runtime/pointer.cpp

  Log Message:
  -----------
  [flang] Fix rank and byte stride in pointer remapping

In some remapping case the rank of the pointer is different
from the target one.

```
program remap
  type :: p
    integer :: a
  end type t
  type(p), target :: ta(10) = [ (t(i),i=1,10) ]
  class(t), pointer :: p(:,:)
  p(1:2,1:5) => ta
end
```

This patch updates the rank and the byte stride to fix such case.

Reviewed By: klausler

Differential Revision: https://reviews.llvm.org/D143566