1// RUN: %libomp-compile && env OMP_NUM_TEAMS=5 OMP_TEAMS_THREAD_LIMIT=7 %libomp-run
2
3#include <stdio.h>
4#include <stdlib.h>
5#include <omp.h>
6
7int main(int argc, char** argv)
8{
9 int iset, iget;
10 iset = 5;
11 iget = omp_get_max_teams();
12 if (iset != iget) {
13 fprintf(stderr, format: "error: nteams-var set to %d, getter returned %d\n", iset, iget);
14 exit(status: 1);
15 }
16 iset = 7;
17 iget = omp_get_teams_thread_limit();
18 if (iset != iget) {
19 fprintf(stderr, format: "error: teams-thread-limit-var set to %d, getter returned %d\n", iset, iget);
20 exit(status: 1);
21 }
22 printf(format: "passed\n");
23 return 0;
24}
25

source code of openmp/runtime/test/api/omp_nteams_api_env.c