| 1 | // RUN: %gdb-compile-and-run 2>&1 | tee %t.out | FileCheck %s |
|---|
| 2 | |
|---|
| 3 | #include "../ompt_plugin.h" |
|---|
| 4 | #include <stdio.h> |
|---|
| 5 | #include <stdlib.h> |
|---|
| 6 | |
|---|
| 7 | int main(int argc, char **argv) { |
|---|
| 8 | int n = 5; |
|---|
| 9 | if (argc > 1) |
|---|
| 10 | n = atoi(nptr: argv[1]); |
|---|
| 11 | int i = 0; |
|---|
| 12 | int a[1000]; |
|---|
| 13 | #pragma omp parallel for |
|---|
| 14 | for (i = 0; i < 100; ++i) { |
|---|
| 15 | #pragma omp task |
|---|
| 16 | { |
|---|
| 17 | a[i] = 42; |
|---|
| 18 | ompd_tool_test(n: 0); |
|---|
| 19 | } |
|---|
| 20 | } |
|---|
| 21 | return 0; |
|---|
| 22 | } |
|---|
| 23 | |
|---|
| 24 | // CHECK-NOT: OMPT-OMPD mismatch |
|---|
| 25 | // CHECK-NOT: Python Exception |
|---|
| 26 | // CHECK-NOT: The program is not being run. |
|---|
| 27 | |
|---|
