Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
ElmerCSC
GitHub Repository: ElmerCSC/elmerfem
Path: blob/devel/elmergrid/src/metis-5.1.0/GKlib/omp.c
3206 views
1
/*
2
* Copyright 1997, Regents of the University of Minnesota
3
*
4
* omp.c
5
*
6
* This file contains "fake" implementations of OpenMP's runtime libraries
7
*
8
*/
9
10
#include <GKlib.h>
11
12
#ifdef GK_NOOPENMP /* remove those for now */
13
#if !defined(_OPENMP)
14
void omp_set_num_threads(int num_threads) { return; }
15
int omp_get_num_threads(void) { return 1; }
16
int omp_get_max_threads(void) { return 1; }
17
int omp_get_thread_num(void) { return 0; }
18
int omp_get_num_procs(void) { return 1; }
19
int omp_in_parallel(void) { return 0; }
20
void omp_set_dynamic(int num_threads) { return; }
21
int omp_get_dynamic(void) { return 0; }
22
void omp_set_nested(int nested) { return; }
23
int omp_get_nested(void) { return 0; }
24
#endif
25
#endif
26
27
28
29