We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 26db5e8 commit 6ffd90bCopy full SHA for 6ffd90b
src/snippets/basic_op_OrOpInvSCplx.incpp
@@ -1,7 +1,7 @@
1
// e1 Or e2=StrictScalar() : e1 everywhere except if e1==0
2
-Data_* right = static_cast<Data_*> (r);
+auto right = dynamic_cast<Data_*> (r);
3
4
-ULong nEl = N_Elements();
+const auto nEl = static_cast<OMPInt>(N_Elements());
5
assert(nEl);
6
Ty s = (*right)[0];
7
if (nEl == 1) {
@@ -13,7 +13,7 @@ if ((GDL_NTHREADS = parallelize(nEl)) == 1) {
13
for (OMPInt i = 0; i < nEl; ++i) if ((*this)[i]==zero) (*this)[i] = s;
14
} else {
15
TRACEOMP(__FILE__, __LINE__)
16
-#pragma omp parallel for num_threads(GDL_NTHREADS)
+ #pragma omp parallel for num_threads(GDL_NTHREADS) default(none) shared(nEl, s)
17
18
}
19
return this;
0 commit comments