blob: 769ff3ffa71672df8f85439616874ffd130b9390 (
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
// RUN: %gdb-compile-and-run 2>&1 | tee %t.out | FileCheck %s
#include "../ompt_plugin.h"
#include <omp.h>
#include <pthread.h>
#include <stdio.h>
#include <unistd.h>
void f(int i) {
if (i <= 0) {
ompd_tool_test(0);
} else {
printf("f(%i) start task 1\n", i);
#pragma omp task
f(i - 1);
printf("f(%i) start task 2\n", i);
#pragma omp task
f(i - 1);
printf("f(%i) start task 3\n", i);
#pragma omp task
f(i - 1);
#pragma omp taskwait
}
}
int main() {
printf("Application: Process %d started.\n", getpid());
omp_set_num_threads(8);
omp_set_max_active_levels(10);
#pragma omp parallel sections
{ f(4); }
return 0;
}
// CHECK-NOT: OMPT-OMPD mismatch
// CHECK-NOT: Python Exception
// CHECK-NOT: The program is not being run.
|