Adapt libgomp acc_get_property.f90 test
authorFrederik Harwath <frederik@codesourcery.com>
Fri, 21 Feb 2020 14:26:02 +0000 (15:26 +0100)
committerFrederik Harwath <frederik@codesourcery.com>
Fri, 21 Feb 2020 14:38:48 +0000 (15:38 +0100)
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.

libgomp/ChangeLog
libgomp/testsuite/libgomp.oacc-fortran/acc_get_property.f90

index 3c640c7..bff3ae5 100644 (file)
@@ -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.
index 80ae292..1af7cc3 100644 (file)
@@ -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)