luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

This version will laeds to speedup of 5 - 7% with VS2019, Windows 10. 

It is useful (necessary?) to have the loop index private,
it might not crash, but happpen that not all are set to 0.
The local ElementPtr  pElement does not sacrifice speed,
but removes a compiler warning.
This commit is contained in:
Holger Vogt 2021-02-06 10:11:17 +01:00
parent 7bb590f249
commit 215b3c513c
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/maths/sparse/spbuild.c
View File

@ -96,7 +96,6 @@ static void ExpandTranslationArrays( MatrixPtr, int );
void
spClear(MatrixPtr Matrix)
{
ElementPtr pElement;
int I;
/* Begin `spClear'. */
@ -106,11 +105,11 @@ spClear(MatrixPtr Matrix)
if (Matrix->PreviousMatrixWasComplex || Matrix->Complex)
{
#ifdef USE_OMP
#pragma omp parallel for private(pElement)
#pragma omp parallel for private(I) schedule(static, 1024)
#endif
for (I = Matrix->Size; I > 0; I--)
{
pElement = Matrix->FirstInCol[I];
ElementPtr pElement = Matrix->FirstInCol[I];
while (pElement != NULL)
{
pElement->Real = 0.0;
@ -122,11 +121,11 @@ spClear(MatrixPtr Matrix)
else
{
#ifdef USE_OMP
#pragma omp parallel for private(pElement)
#pragma omp parallel for private(I) schedule(static, 1024)
#endif
for (I = Matrix->Size; I > 0; I--)
{
pElement = Matrix->FirstInCol[I];
ElementPtr pElement = Matrix->FirstInCol[I];
while (pElement != NULL)
{
pElement->Real = 0.0;