sci-libs/adolc/files/2.2.1-sparse-openmp.patch


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

--- ADOL-C-2.1.12.orig/ADOL-C/src/sparse/sparsedrivers.cpp	2011-03-28 00:28:00.000000000 +0100
+++ ADOL-C-2.1.12/ADOL-C/src/sparse/sparsedrivers.cpp	2011-03-30 04:05:29.000000000 +0100
@@ -598,6 +598,8 @@
 {
     SparseHessInfos sHinfos;
     TapeInfos *tapeInfos;
+    ADOLC_OPENMP_THREAD_NUMBER;
+    ADOLC_OPENMP_GET_THREAD_NUMBER;
 
     tapeInfos=getTapeInfos(tag);
     memcpy(&ADOLC_CURRENT_TAPE_INFOS, tapeInfos, sizeof(TapeInfos));
@@ -626,6 +628,8 @@
 {
     SparseHessInfos sHinfos;
     TapeInfos *tapeInfos;
+    ADOLC_OPENMP_THREAD_NUMBER;
+    ADOLC_OPENMP_GET_THREAD_NUMBER;
 
     tapeInfos=getTapeInfos(tag);
     memcpy(&ADOLC_CURRENT_TAPE_INFOS, tapeInfos, sizeof(TapeInfos));