[flang][openacc] Convert rhs expr to the lhs type on atomic read/write (#70377)
commit8e463b3083e4bf11231097771d78187db2127760
authorValentin Clement (バレンタイン クレメン) <clementval@gmail.com>
Fri, 27 Oct 2023 20:31:05 +0000 (27 13:31 -0700)
committerGitHub <noreply@github.com>
Fri, 27 Oct 2023 20:31:05 +0000 (27 13:31 -0700)
treef505f4c5bdbdcf18c2e3ab2e42603027e8df7476
parent33330966e59b2654024c0eb889837c0c54695c98
[flang][openacc] Convert rhs expr to the lhs type on atomic read/write (#70377)

In some cases the rhs expression scalar type is not the same as the lhs
type. A convert op is needed before the acc.atomic.read or
acc.atomic.write operation to fit with the requirements of the
operations.
flang/lib/Lower/DirectivesCommon.h
flang/test/Lower/OpenACC/acc-atomic-capture.f90
flang/test/Lower/OpenACC/acc-atomic-read.f90