blob: 9c67f83a5dad20962fc414f3c8667fd55701c532 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
/* { dg-do compile } */
/* { dg-additional-options "-fdump-tree-gimple" } */
#include <stddef.h>
size_t
vla (int array_li)
{
float array[array_li];
size_t size1, size2;
#pragma omp parallel default(none) shared(size1, array)
size1 = sizeof array;
#pragma omp target defaultmap(none) map(from:size2) map(alloc:array)
size2 = sizeof array;
return size1 + size2;
}
/* { dg-final { scan-tree-dump "omp parallel .*shared\\(array_li\.\[0-9\]\\)" "gimple" } } */
/* C */
/* { dg-final { scan-tree-dump "omp target .*private\\(array_li\.\[0-9\]\\)" "gimple" { target { ! c++ } } } } */
/* C++ */
/* { dg-final { scan-tree-dump "omp target .*firstprivate\\(array_li\.\[0-9\]\\)" "gimple" { target { c++ } } } } */
|
