mirrors/llvm-project
0
0
Fork 0
mirror of https://github.com/llvm/llvm-project.git synced 2025-04-16 05:26:31 +00:00
Code Issues Projects Releases Wiki Activity
llvm-project/flang/test/Semantics/OpenACC/acc-host-data.f90

Ignoring revisions in .git-blame-ignore-revs. Click here to bypass and see the normal blame view.

42 lines
1.0 KiB
Fortran
Raw Normal View History

[Flang] Ported test_errors.sh to Python To enable Flang testing on Windows, shell scripts have to be ported to Python. In this patch the "test_errors.sh" script is ported to python ("test_errors.py"). The RUN line of existing tests was changed to make use of the python script. Used python regex in place of awk/sed. Reviewed By: Meinersbur Differential Revision: https://reviews.llvm.org/D107575
2021-09-06 08:19:20 +00:00
! RUN: %python %S/../test_errors.py %s %flang -fopenacc
[flang][openacc][NFC] Organize clause validity tests by directive Split the tests from acc-clause-validity.f90 in dedicated files by directives. The file acc-clause-validity.f90 was getting too big to be correctly maintained. Tests are identical. Reviewed By: SouraVX Differential Revision: https://reviews.llvm.org/D95328
2021-01-26 14:53:50 -05:00
! Check OpenACC clause validity for the following construct and directive:
! 2.8 host_data
program openacc_host_data_validity
implicit none
integer, parameter :: N = 256
real(8), dimension(N, N) :: aa, bb
logical :: ifCondition = .TRUE.
!ERROR: At least one of USE_DEVICE clause must appear on the HOST_DATA directive
!$acc host_data
!$acc end host_data
!$acc host_data use_device(aa)
!$acc end host_data
!$acc host_data use_device(aa) if(.true.)
!$acc end host_data
!$acc host_data use_device(aa) if(ifCondition)
!$acc end host_data
!$acc host_data use_device(aa, bb) if_present
!$acc end host_data
[flang][openacc] Allow if_present multiple times on host_data and update (#135422) Similar to #135415. The spec has not strict restriction to allow a single `if_present` clause on the host_data and update directives. Allowing this clause multiple times does not change the semantic of it. This patch relax the rules in ACC.td since there is no restriction in the standard. The OpenACC dialect represents the `if_present` clause with a `UnitAttr` so the attribute will be set if the is one or more `if_present` clause.
2025-04-11 14:01:03 -07:00
! OK
[flang][openacc] Fix clause restriction for host_data directive Restriction on clauses for the HOST_DATA directive were not fully correct. This patch fixes the situation. The if and if_present clauses are allowed only once. Reviewed By: SouraVX Differential Revision: https://reviews.llvm.org/D95473
2021-01-27 10:06:18 -05:00
!$acc host_data use_device(aa, bb) if_present if_present
!$acc end host_data
[flang][openacc][NFC] Organize clause validity tests by directive Split the tests from acc-clause-validity.f90 in dedicated files by directives. The file acc-clause-validity.f90 was getting too big to be correctly maintained. Tests are identical. Reviewed By: SouraVX Differential Revision: https://reviews.llvm.org/D95328
2021-01-26 14:53:50 -05:00
!$acc host_data use_device(aa, bb) if(.true.) if_present
!$acc end host_data
[flang][openacc] Fix clause restriction for host_data directive Restriction on clauses for the HOST_DATA directive were not fully correct. This patch fixes the situation. The if and if_present clauses are allowed only once. Reviewed By: SouraVX Differential Revision: https://reviews.llvm.org/D95473
2021-01-27 10:06:18 -05:00
!ERROR: At most one IF clause can appear on the HOST_DATA directive
[flang][openacc][NFC] Organize clause validity tests by directive Split the tests from acc-clause-validity.f90 in dedicated files by directives. The file acc-clause-validity.f90 was getting too big to be correctly maintained. Tests are identical. Reviewed By: SouraVX Differential Revision: https://reviews.llvm.org/D95328
2021-01-26 14:53:50 -05:00
!$acc host_data use_device(aa, bb) if(.true.) if(ifCondition)
!$acc end host_data
end program openacc_host_data_validity
Reference in New Issue Copy Permalink