48 lines · c
1// RUN: %gdb-compile 2>&1 | tee %t.compile2// RUN: %gdb-test -x %S/ompd_parallel.cmd %t 2>&1 | tee %t.out | FileCheck %s3 4// REQUIRES: determinism5 6#include <omp.h>7#include <stdio.h>8 9int main() {10 omp_set_max_active_levels(3);11 omp_set_num_threads(7);12#pragma omp parallel13 {14 omp_set_num_threads(5);15#pragma omp parallel16 {17 omp_set_num_threads(3);18#pragma omp parallel19 { printf("In nested level:3, team size = %d.\n", omp_get_num_threads()); }20 21 printf("In nested level:2, team size = %d.\n", omp_get_num_threads());22 }23 printf("In nested level:1, team size = %d.\n", omp_get_num_threads());24 }25 26 return 0;27}28 29// CHECK: Loaded OMPD lib successfully!30// CHECK: Nesting Level 3: Team Size: 331// CHECK: ompd_parallel.c{{[ ]*}}:1632// CHECK: Nesting Level 2: Team Size: 533// CHECK: ompd_parallel.c{{[ ]*}}:1334// CHECK: Nesting Level 1: Team Size: 735// CHECK: ompd_parallel.c{{[ ]*}}:1036 37// CHECK: Nesting Level 2: Team Size: 538// CHECK: ompd_parallel.c{{[ ]*}}:1339// CHECK: Nesting Level 1: Team Size: 740// CHECK: ompd_parallel.c{{[ ]*}}:1041 42// CHECK: Nesting Level 1: Team Size: 743// CHECK: ompd_parallel.c{{[ ]*}}:1044 45// CHECK-NOT: Python Exception46// CHECK-NOT: The program is not being run.47// CHECK-NOT: No such file or directory48