aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/trans-openmp.c
diff options
context:
space:
mode:
authorTobias Burnus <tobias@codesourcery.com>2019-10-10 08:48:14 +0000
committerTobias Burnus <burnus@gcc.gnu.org>2019-10-10 10:48:14 +0200
commit4a9150d04a2a9b6f322d3deb65eaf5b4f614ed12 (patch)
treeba62aa2230ab0735ca74c3c3c6102c0cd39ddd3f /gcc/fortran/trans-openmp.c
parent051fb43f810d34a683a5112112757abf6998325a (diff)
downloadgcc-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/fortran/trans-openmp.c')
-rw-r--r--gcc/fortran/trans-openmp.c3
1 files changed, 3 insertions, 0 deletions
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;