OpenMP to spClear to parallelize the loop.

Just temporarily because it crahes ReleaseOmp
in VS2019
This commit is contained in:
Holger Vogt 2021-02-04 21:52:25 +01:00
parent 70d669a42b
commit d171530b33
1 changed files with 6 additions and 0 deletions

View File

@ -105,6 +105,9 @@ spClear(MatrixPtr Matrix)
/* Clear matrix. */
if (Matrix->PreviousMatrixWasComplex || Matrix->Complex)
{
#ifdef USE_OMP
#pragma omp parallel for
#endif
for (I = Matrix->Size; I > 0; I--)
{
pElement = Matrix->FirstInCol[I];
@ -118,6 +121,9 @@ spClear(MatrixPtr Matrix)
}
else
{
#ifdef USE_OMP
#pragma omp parallel for
#endif
for (I = Matrix->Size; I > 0; I--)
{
pElement = Matrix->FirstInCol[I];