[flang-commits] [flang] [flang][OpenMP] Reland Fix copyprivate semantic checks (#95799) (PR #101009)

[Tom Eccles via flang-commits]

tblah wrote:

Thanks for the updated version with regressions fixed. Unfortunately this fails(*) another of our tests (minimized):
```
program repro
  integer, parameter :: SIZE=20
  integer :: i
  integer :: array(SIZE)
  !$omp parallel
  array = [ (i,i=1,SIZE) ]
  print *,i
  !$omp end parallel
end program
```

(*) it hits a HLFIR TODO that wasn't previously encountered. It is possible that it should have been, but it is a regression in previously working code.

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