llvm-project/clang/test/AST/ast-print-openacc-data-construct.cpp
erichkeane afcb7d4a2e [OpenACC] Implement 'wait' sema for data constructs
This is once again simply enabling this for 'data', 'enter data', and
'exit data' (and ensuring we error for 'host_data').  Implementation is
very simply to enable it rather than emit the not-implemented
diagnostic.
2024-12-12 12:16:20 -08:00

76 lines
2.1 KiB
C++

// RUN: %clang_cc1 -fopenacc -Wno-openacc-deprecated-clause-alias -Wno-source-uses-openacc -ast-print %s -o - | FileCheck %s
void foo() {
int Var;
// TODO OpenACC: These are only legal if they have one of a list of clauses on
// them, so the 'check' lines should start to include those once we implement
// them. For now, they don't emit those because they are 'not implemented'.
// CHECK: #pragma acc data
// CHECK-NOT: default(none)
#pragma acc data default(none)
;
// CHECK: #pragma acc data device_type(int)
#pragma acc data device_type(int)
;
// CHECK: #pragma acc enter data
// CHECK-NOT: copyin(Var)
#pragma acc enter data copyin(Var)
;
// CHECK: #pragma acc exit data
// CHECK-NOT: copyout(Var)
#pragma acc exit data copyout(Var)
;
// CHECK: #pragma acc host_data
// CHECK-NOT: use_device(Var)
#pragma acc host_data use_device(Var)
;
int i;
int *iPtr;
int array[5];
// CHECK: #pragma acc data if(i == array[1])
#pragma acc data default(none) if(i == array[1])
;
// CHECK: #pragma acc enter data if(i == array[1])
#pragma acc enter data copyin(Var) if(i == array[1])
;
// CHECK: #pragma acc exit data if(i == array[1])
#pragma acc exit data copyout(Var) if(i == array[1])
;
// CHECK: #pragma acc host_data if(i == array[1])
#pragma acc host_data use_device(Var) if(i == array[1])
;
// CHECK: #pragma acc data async(i)
#pragma acc data default(none) async(i)
;
// CHECK: #pragma acc enter data async(i)
#pragma acc enter data copyin(i) async(i)
// CHECK: #pragma acc exit data async
#pragma acc exit data copyout(i) async
// CHECK: #pragma acc data wait
#pragma acc data default(none) wait()
;
// CHECK: #pragma acc enter data wait()
#pragma acc enter data copyin(Var) wait()
// CHECK: #pragma acc exit data wait(*iPtr, i)
#pragma acc exit data copyout(Var) wait(*iPtr, i)
// CHECK: #pragma acc data wait(queues: *iPtr, i)
#pragma acc data default(none) wait(queues:*iPtr, i)
;
// CHECK: #pragma acc enter data wait(devnum: i : *iPtr, i)
#pragma acc enter data copyin(Var) wait(devnum:i:*iPtr, i)
// CHECK: #pragma acc exit data wait(devnum: i : queues: *iPtr, i)
#pragma acc exit data copyout(Var) wait(devnum:i:queues:*iPtr, i)
}