(root)/
gcc-13.2.0/
libgomp/
testsuite/
libgomp.c-c++-common/
omp-display-env-2.c
       1  /* { dg-do run } */
       2  /* { dg-set-target-env-var OMP_NUM_TEAMS "42" } */
       3  
       4  /* This test checks if omp_display_env outputs the initial ICV values although
       5     the value was updated.  */
       6  
       7  #include <omp.h>
       8  #include <stdlib.h>
       9  
      10  int
      11  main ()
      12  {
      13    omp_display_env (1);
      14    omp_set_num_teams (24);
      15    if (omp_get_max_teams () != 24)
      16      abort ();
      17    omp_display_env (1);
      18  
      19    return 0;
      20  }
      21  
      22  /* { dg-output ".*\\\[host] OMP_NUM_TEAMS = '42'.*\\\[host] OMP_NUM_TEAMS = '42'" { target native } } */