diff options
| author | Tobias Burnus <tobias@codesourcery.com> | 2019-10-10 08:48:14 +0000 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2019-10-10 10:48:14 +0200 |
| commit | 4a9150d04a2a9b6f322d3deb65eaf5b4f614ed12 (patch) | |
| tree | ba62aa2230ab0735ca74c3c3c6102c0cd39ddd3f /gcc | |
| parent | 051fb43f810d34a683a5112112757abf6998325a (diff) | |
| download | gcc-4a9150d04a2a9b6f322d3deb65eaf5b4f614ed12.zip gcc-4a9150d04a2a9b6f322d3deb65eaf5b4f614ed12.tar.gz gcc-4a9150d04a2a9b6f322d3deb65eaf5b4f614ed12.tar.bz2 | |
[Fortran, OpenMP] Actually pass use_device_addr on to the middle end
* trans-openmp.c (gfc_trans_omp_clauses): Actually pass
use_device_addr on to the middle end.
From-SVN: r276791
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/trans-openmp.c | 3 |
2 files changed, 8 insertions, 0 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 7847042..0577659 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2019-10-10 Tobias Burnus <tobias@codesourcery.com> + + * trans-openmp.c (gfc_trans_omp_clauses): Actually pass use_device_addr + on to the middle end. + 2019-10-08 Steven G. Kargl <kargl@gcc.gnu.org> PR fortran/91801 diff --git a/gcc/fortran/trans-openmp.c b/gcc/fortran/trans-openmp.c index f83bab4..35c2f28 100644 --- a/gcc/fortran/trans-openmp.c +++ b/gcc/fortran/trans-openmp.c @@ -1887,6 +1887,9 @@ gfc_trans_omp_clauses (stmtblock_t *block, gfc_omp_clauses *clauses, case OMP_LIST_USE_DEVICE_PTR: clause_code = OMP_CLAUSE_USE_DEVICE_PTR; goto add_clause; + case OMP_LIST_USE_DEVICE_ADDR: + clause_code = OMP_CLAUSE_USE_DEVICE_ADDR; + goto add_clause; case OMP_LIST_IS_DEVICE_PTR: clause_code = OMP_CLAUSE_IS_DEVICE_PTR; goto add_clause; |