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.
This commit is contained in:
parent
91e50b2aa2
commit
83d45e1d71
2 changed files with 9 additions and 1 deletions
|
@ -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.
|
||||
|
|
|
@ -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)
|
||||
|
|
Loading…
Add table
Reference in a new issue