From 83d45e1d7155a5a600d8a4aa01aca00d3c6c2d3a Mon Sep 17 00:00:00 2001
From: Frederik Harwath <frederik@codesourcery.com>
Date: Fri, 21 Feb 2020 15:26:02 +0100
Subject: [PATCH] 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.
---
libgomp/ChangeLog | 7 +++++++
.../testsuite/libgomp.oacc-fortran/acc_get_property.f90 | 3 ++-
2 files changed, 9 insertions(+), 1 deletion(-)
@@ -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)
--
2.17.1