tree f120437804c357ddec40385373621b3c5061309b
parent b6ea04a37b2a41e24bb999e5a9b6a7bd2b576085
author Andre Kuhlenschmidt <andre.kuhlenschmidt@gmail.com> 1752871809 -0700
committer GitHub <noreply@github.com> 1752871809 -0700
gpgsig -----BEGIN PGP SIGNATURE-----
 
 wsFcBAABCAAQBQJoerOBCRC1aQ7uu5UhlAAAyPYQAFwg0GNDKj2mF3LEqXQCCnJa
 hRyBM5HjiRJDxFbJ0CaLqVBp4yBuY+K4XqLWJUKfJxIxTK5CUFKDeD/4G73Y/4ls
 fPnU17lh3kp53Eb37orrqumlvjHTmSPRkHDOUMa8SYE988evJrEkWD4+LEGA9fi2
 tH3ClvvqsA927d4BJq87Q03x6KHuMbaG3vAl4UYFFG8ydHReWeorqfLxwiTM58qK
 ajNUkXgltwlgBiQ9ybuz2Fx7b0Ct9dReQIcp5GezUx5f4+3MY1DUzGVZtjQiXSgS
 zcWl+s1Lje1h1ZK4cSmomzrRTnCynFUR+RyXDplbpKuDomCzZfYj7ESf/WBMizio
 Gx+csdHriJp+IEAeMrB0txsDDxVPO1iraktjv60hlz2U1+iz7bWays5qt7ZiCZ8D
 YgJ/V1uJ8V30CMO55UOdANu0UGzAZIv5l706YItANle6Q9yMAe8BgEKE29c6+Ej3
 L3e6Q637eMJZtUXrDMk0BgvWV8c1H4zet3CUNkWc6/NMCU29X+uueiIhVPAkG0p3
 XW2rIMD2q8IRCLWiVdp82awrSMNGF3Nw1QeVXnIeUQ8ZMLjliYfcZdpxiEegRsBG
 6FAjqqg4ZHohlazJxYNdplCyB9hKlAUGpLk5drk9daVPvJA6VrFXWnUAivS3PXbq
 wg12YDKRAS2FlXKgRXOu
 =oOch
 -----END PGP SIGNATURE-----
 

[flang][openacc] fix bugs with default(none) checking (#149220)

A report of the following code not generating an error led to fixing two bugs in directive checking.

- We should treat CombinedConstructs as OpenACC Constructs
- We should treat DoConstruct index variables as private. 

```fortran
subroutine sub(nn)
  integer :: nn, ii
  !$acc serial loop default(none)
  do ii = 1, nn
  end do
  !$acc end serial loop
end subroutine
```
Here `nn` should be flagged as needing a data clause while `ii` should
still get one implicitly.