32 lines
		
	
	
		
			884 B
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			32 lines
		
	
	
		
			884 B
		
	
	
	
		
			C
		
	
	
	
| // RUN:   %clang_cc1 -fopenmp -E -o - %s 2>&1 | FileCheck %s
 | |
| 
 | |
| // This is to make sure the pragma name is not expanded!
 | |
| #define omp (0xDEADBEEF)
 | |
| 
 | |
| #define N 2
 | |
| #define M 1
 | |
| #define E N>
 | |
| 
 | |
| #define map_to_be_expanded(x) map(tofrom:x)
 | |
| #define sched_to_be_expanded(x,s) schedule(x,s)
 | |
| #define reda_to_be_expanded(x) reduction(+:x)
 | |
| #define redb_to_be_expanded(x,op) reduction(op:x)
 | |
| 
 | |
| void foo(int *a, int *b) {
 | |
|   //CHECK: omp target map(a[0:2]) map(tofrom:b[0:2*1])
 | |
|   #pragma omp target map(a[0:N]) map_to_be_expanded(b[0:2*M])
 | |
|   {
 | |
|     int reda;
 | |
|     int redb;
 | |
|     //CHECK: omp parallel for schedule(static,2> >1) reduction(+:reda) reduction(*:redb)
 | |
|     #pragma omp parallel for sched_to_be_expanded(static, E>1) \
 | |
|         reda_to_be_expanded(reda) redb_to_be_expanded(redb,*)
 | |
|     for (int i = 0; i < N; ++i) {
 | |
|       reda += a[i];
 | |
|       redb += b[i];
 | |
|     }
 | |
|     a[0] = reda;
 | |
|     b[0] = redb;
 | |
|   }
 | |
| }
 |