git.ipfire.org Git - people/ms/gcc.git/commit

author	Tobias Burnus <tobias@codesourcery.com>
	Tue, 19 Jan 2021 10:57:34 +0000 (11:57 +0100)
committer	Tobias Burnus <tobias@codesourcery.com>
	Tue, 19 Jan 2021 10:58:21 +0000 (11:58 +0100)
commit	049bfd186fae9fb764a3ec04acb20d3eaacda7a3
tree	ccfc528fa1495feaf59625d72f52ad034f229d37	tree \| snapshot
parent	9b8741c98f2876a430c12c85b396d29a87c9c488	commit \| diff

OpenMP/Fortran: Fixes for {use,is}_device_ptr

gcc/fortran/ChangeLog:

PR fortran/98476
* openmp.c (resolve_omp_clauses): Change use_device_ptr
to use_device_addr for unless type(c_ptr); check all
list item for is_device_ptr.

gcc/ChangeLog:

PR fortran/98476
* omp-low.c (lower_omp_target): Handle nonpointer is_device_ptr.

libgomp/ChangeLog:

PR fortran/98476
* testsuite/libgomp.fortran/is_device_ptr-1.f90: New test.

gcc/testsuite/ChangeLog:

PR fortran/98476
* gfortran.dg/gomp/map-3.f90: Update expected scan-dump-tree.
* gfortran.dg/gomp/is_device_ptr-2.f90: New test.
* gfortran.dg/gomp/use_device_ptr-1.f90: New test.

gcc/fortran/openmp.c		diff \| blob \| blame \| history
gcc/omp-low.c		diff \| blob \| blame \| history
gcc/testsuite/gfortran.dg/gomp/is_device_ptr-2.f90	[new file with mode: 0644]	blob
gcc/testsuite/gfortran.dg/gomp/map-3.f90		diff \| blob \| blame \| history
gcc/testsuite/gfortran.dg/gomp/use_device_ptr-1.f90	[new file with mode: 0644]	blob
libgomp/testsuite/libgomp.fortran/is_device_ptr-1.f90	[new file with mode: 0644]	blob