/[escript]/trunk-mpi-branch/escript/src/Utils.cpp
ViewVC logotype

Annotation of /trunk-mpi-branch/escript/src/Utils.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1295 - (hide annotations)
Mon Sep 10 06:07:09 2007 UTC (12 years ago) by ksteube
File size: 1020 byte(s)
Have now merged latest trunk features into MPI branch in preparation for
ending the MPI branch.
Compiles but has run time problems in bandwith reduction.

1 gross 391 /*
2 elspeth 615 ************************************************************
3     * Copyright 2006 by ACcESS MNRF *
4     * *
5     * http://www.access.edu.au *
6     * Primary Business: Queensland, Australia *
7     * Licensed under the Open Software License version 3.0 *
8     * http://www.opensource.org/licenses/osl-3.0.php *
9     * *
10     ************************************************************
11 gross 391 */
12    
13 jgs 474 #include "Utils.h"
14 gross 797 #include "DataVector.h"
15 gross 391
16 jgs 478 #ifdef _OPENMP
17     #include <omp.h>
18     #endif
19    
20 gross 391 namespace escript {
21    
22 ksteube 1295 int getSvnVersion()
23     {
24     #ifdef SVN_VERSION
25     return SVN_VERSION;
26     #else
27     return 0;
28     #endif
29     }
30    
31 gross 391 void setNumberOfThreads(const int num_threads)
32     {
33    
34     #ifdef _OPENMP
35     omp_set_num_threads(num_threads);
36     #endif
37    
38     }
39    
40     int getNumberOfThreads()
41     {
42     #ifdef _OPENMP
43     return omp_get_max_threads();
44     #else
45     return 1;
46     #endif
47    
48     }
49    
50     } // end of namespace

  ViewVC Help
Powered by ViewVC 1.1.26