[flang-commits] [llvm] [flang] [mlir] [flang][mlir][OpenMP] Add support for COPYPRIVATE (PR #73128)

[Kiran Chandramohan via flang-commits]

kiranchandramohan wrote:

I am assuming there is still some additional work here to support some kind of arrays.

```
subroutine test_array(a)
  integer :: a(:)

  !$omp parallel private(a)
  !$omp single
  a = 100
  !$omp end single copyprivate(a)
  !$omp end parallel
end subroutine
```

```
subroutine test_array(n)
  integer :: a(n)

  !$omp parallel private(a)
  !$omp single
  a = 100
  !$omp end single copyprivate(a)
  !$omp end parallel
end subroutine
```

https://github.com/llvm/llvm-project/pull/73128