From 532122b410b536ca7d3a15264e185696a84586eb Mon Sep 17 00:00:00 2001 From: Michael Klemm Date: Fri, 18 Oct 2024 20:26:30 +0200 Subject: [PATCH] Delete CUDA Fortran test --- flang/test/Semantics/cuf10.cuf | 26 -------------------------- 1 file changed, 26 deletions(-) delete mode 100644 flang/test/Semantics/cuf10.cuf diff --git a/flang/test/Semantics/cuf10.cuf b/flang/test/Semantics/cuf10.cuf deleted file mode 100644 index f785be81ac94b5..00000000000000 --- a/flang/test/Semantics/cuf10.cuf +++ /dev/null @@ -1,26 +0,0 @@ -! RUN: %python %S/test_errors.py %s %flang_fc1 -module m - real, device :: a(4,8) - real, managed, allocatable :: b(:,:) - contains - attributes(global) subroutine kernel(a,b,c,n,m) - integer, value :: n - integer, intent(in) :: m - real a(n,m), c(n,m) - real, managed :: b(n,m) - end - attributes(device) subroutine devsub(a,n) - integer, value :: n - real, device :: a(n) - end - subroutine test - real c(4) - allocate(b(4,8)) - !ERROR: dummy argument 'm=' has ATTRIBUTES(DEVICE) but its associated actual argument has no CUDA data attribute - call kernel<<<1,32>>>(a,b,b,4,8) - !$acc parallel loop copy(c) - do j = 1, 1 - call devsub(c,4) ! not checked in OpenACC construct - end do - end -end