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

Revert "ARRAY_OFFSET needed" 

This reverts commit c1ab187e86.
This commit is contained in:
dwarning 2023-06-13 19:23:07 +02:00
parent c1ab187e86
commit b6ecab3e3f
4 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/maths/sparse/spFactor.c
View File

@ -1845,7 +1845,7 @@ register int I, Size = Matrix->Size;
register ElementPtr pElement;
int NumberOfTies = 0;
long Product, MinMarkowitzProduct;
ElementPtr ChosenPivot, pLargestElement = NULL;
ElementPtr ChosenPivot, pLargestElement;
RealNumber Magnitude, LargestElementMag, Ratio, RatioOfAccepted = 0, LargestInCol;
RealNumber FindLargestInCol();

2
src/maths/sparse/spOutput.c
View File

@ -159,8 +159,6 @@ int *PrintOrdToIntRowMap, *PrintOrdToIntColMap;
SP_CALLOC( PrintOrdToIntColMap, int, Top + 1 );
if ( PrintOrdToIntRowMap == NULL OR PrintOrdToIntColMap == NULL)
{ Matrix->Error = spNO_MEMORY;
SP_FREE(PrintOrdToIntColMap);
SP_FREE(PrintOrdToIntRowMap);
return;
}
for (I = 1; I <= Size; I++)

2
src/maths/sparse/spSMP.c
View File

@ -431,10 +431,10 @@ SMPcDProd(SMPmatrix *Matrix, SPcomplex *pMantissa, int *pExponent)
if (y < z)
y = z;
#ifdef debug_print
*pExponent = (int)(x + y);
x = scalbn(re, (int) -y);
z = scalbn(im, (int) -y);
#ifdef debug_print
printf(" ** values are: re %g, im %g, y %g, re' %g, im' %g\n",
re, im, y, x, z);
#endif

3
src/maths/sparse/spUtils.c
View File

@ -2192,8 +2192,7 @@ int Row, Col, Error;
}
else ABORT();
if (Matrix != NULL)
Matrix->Error = spOKAY;
Matrix->Error = spOKAY;
return;
}
#endif /* DOCUMENTATION */