1 #pragma omp declare target 2 _Complex int *g; 3 #pragma omp end declare target 4 5 6 7 _Complex float f(void); 8 9 int main()10main () 11 { 12 _Complex int y; 13 #pragma omp target map(from:y) 14 { 15 _Complex int x; 16 g = &x; 17 __imag__ x = 1; 18 __real__ x = 2; 19 y = x; 20 } 21 22 if ((__imag__ y != 1) 23 || (__real__ y != 2)) 24 __builtin_abort (); 25 return 0; 26 } 27 28