* src/analysis/cktsens.c: Matrixes cannot be created non-complex.

Also added a check to detect an error condition on delta_Y =
	spCreate(...).

	* src/analysis/cktpzld.c: Formatting updates.
This commit is contained in:
arno 2000-07-03 15:30:05 +00:00
parent 7ac9278389
commit 478ee433ae
2 changed files with 6 additions and 6 deletions

View File

@ -45,10 +45,10 @@ combine:
/* See if any of the DEVload functions bailed. If not, proceed. */
IGOP_( &type, &error, &length, "max" );
if (error == OK) {
SMPcCombine( ckt->CKTmatrix, ckt->CKTrhs, ckt->CKTrhsSpare,
ckt->CKTirhs, ckt->CKTirhsSpare );
SMPcCombine(ckt->CKTmatrix, ckt->CKTrhs, ckt->CKTrhsSpare,
ckt->CKTirhs, ckt->CKTirhsSpare );
} else {
return(error);
return(error);
}
#endif /* PARALLEL_ARCH */

View File

@ -127,9 +127,9 @@ int sens_sens(CKTcircuit *ckt, int restart)
size = spGetSize(ckt->CKTmatrix, 1);
/* Create the perturbation matrix */
/* XXX check error return, '1' is complex -- necessary?
* only in ac */
delta_Y = spCreate(size, !is_dc, &error);
delta_Y = spCreate(size, 1, &error);
if (error)
return error;
size += 1;