brintos

brintos / llvm-project-archived public Read only

0
0
Text · 1.2 KiB · eb9cef9 Raw
52 lines · c
1// RUN: %gdb-compile 2>&1 | tee %t.compile2// RUN: env OMP_SCHEDULE=guided,10 %gdb-run 2>&1 | tee %t.out | FileCheck %s3 4#include "../ompt_plugin.h"5#include <omp.h>6#include <stdio.h>7#include <unistd.h>8 9int main() {10  printf("Application: Process %d started.\n", getpid());11 12  int i;13  omp_set_num_threads(3);14  omp_set_max_active_levels(10);15 16#pragma omp parallel // parallel region begins17  {18    printf("outer parallel region Thread ID == %d\n", omp_get_thread_num());19    /* Code for work to be done by outer parallel region threads over here. */20 21    if (omp_get_thread_num() == 2)22      sleep(1);23 24#pragma omp parallel num_threads(2) // nested parallel region25    {26      /* Code for work to be done by inner parallel region threads over here. */27      printf("inner parallel region thread id %d\n", omp_get_thread_num());28 29      // if (omp_get_thread_num() == 1) sleep(1000);30 31#pragma omp parallel num_threads(2) //32      {33 34#pragma omp for35        for (i = 0; i < 20; i++) {36          // Some independent iterative computation to be done.37          printf("");38          ompd_tool_test(0);39        }40      }41    }42  }43 44  // sleep(1000);45 46  return 0;47}48 49// CHECK-NOT: OMPT-OMPD mismatch50// CHECK-NOT: Python Exception51// CHECK-NOT: The program is not being run.52