aboutsummaryrefslogtreecommitdiff
path: root/libgomp
diff options
context:
space:
mode:
authorFrederik Harwath <frederik@codesourcery.com>2020-02-21 15:26:02 +0100
committerFrederik Harwath <frederik@codesourcery.com>2020-02-21 15:38:48 +0100
commit83d45e1d7155a5a600d8a4aa01aca00d3c6c2d3a (patch)
tree7b43a8542299ed2ef22ab0687dc604cc95bd2c76 /libgomp
parent91e50b2aa2dece9e22ae793d2a1a14b33bf3859d (diff)
downloadgcc-83d45e1d7155a5a600d8a4aa01aca00d3c6c2d3a.zip
gcc-83d45e1d7155a5a600d8a4aa01aca00d3c6c2d3a.tar.gz
gcc-83d45e1d7155a5a600d8a4aa01aca00d3c6c2d3a.tar.bz2
Adapt libgomp acc_get_property.f90 test
The commit r10-6721-g8d1a1cb1b816381bf60cb1211c93b8eba1fe1472 has changed the name of the type that is used for the return value of the Fortran acc_get_property function without adapting the test acc_get_property.f90. 2020-02-21 Frederik Harwath <frederik@codesourcery.com> * testsuite/libgomp.oacc-fortran/acc_get_property.f90: Adapt to changes from 2020-02-19, i.e. use integer(c_size_t) instead of integer(acc_device_property) for the type of the return value of acc_get_property.
Diffstat (limited to 'libgomp')
-rw-r--r--libgomp/ChangeLog7
-rw-r--r--libgomp/testsuite/libgomp.oacc-fortran/acc_get_property.f903
2 files changed, 9 insertions, 1 deletions
diff --git a/libgomp/ChangeLog b/libgomp/ChangeLog
index 3c640c7..bff3ae5 100644
--- a/libgomp/ChangeLog
+++ b/libgomp/ChangeLog
@@ -1,3 +1,10 @@
+2020-02-21 Frederik Harwath <frederik@codesourcery.com>
+
+ * testsuite/libgomp.oacc-fortran/acc_get_property.f90: Adapt to
+ changes from 2020-02-19, i.e. use integer(c_size_t) instead of
+ integer(acc_device_property) for the type of the return value of
+ acc_get_property.
+
2020-02-19 Tobias Burnus <tobias@codesourcery.com>
* .gitattributes: New; whitespace handling for Fortran's openacc_lib.h.
diff --git a/libgomp/testsuite/libgomp.oacc-fortran/acc_get_property.f90 b/libgomp/testsuite/libgomp.oacc-fortran/acc_get_property.f90
index 80ae292..1af7cc3 100644
--- a/libgomp/testsuite/libgomp.oacc-fortran/acc_get_property.f90
+++ b/libgomp/testsuite/libgomp.oacc-fortran/acc_get_property.f90
@@ -26,13 +26,14 @@ end program test
! and do basic device independent validation.
subroutine print_device_properties (device_type)
use openacc
+ use iso_c_binding, only: c_size_t
implicit none
integer, intent(in) :: device_type
integer :: device_count
integer :: device
- integer(acc_device_property) :: v
+ integer(c_size_t) :: v
character*256 :: s
device_count = acc_get_num_devices(device_type)