From f3127234aa36d057f06eafbc30b6bd5af512dd5e Mon Sep 17 00:00:00 2001 From: Francesco Lannutti Date: Sun, 15 Mar 2020 00:25:54 +0100 Subject: [PATCH] Maintain the KLU related changes under '#ifdef KLU' --- src/spicelib/analysis/cktic.c | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) diff --git a/src/spicelib/analysis/cktic.c b/src/spicelib/analysis/cktic.c index 448a6fcd0..0dcc35ef7 100644 --- a/src/spicelib/analysis/cktic.c +++ b/src/spicelib/analysis/cktic.c @@ -25,6 +25,8 @@ CKTic(CKTcircuit *ckt) for(node = ckt->CKTnodes;node != NULL; node = node->next) { if(node->nsGiven) { + +#ifdef KLU if (ckt->CKTkluMODE) { node->ptr = (double *) SMPfindElt (ckt->CKTmatrix, node->number, node->number, 0) ; if (node->ptr == NULL) { @@ -32,14 +34,22 @@ CKTic(CKTcircuit *ckt) printf ("Please specify an existing element for .nodeset\n") ; } } else { +#endif + node->ptr = SMPmakeElt(ckt->CKTmatrix,node->number,node->number); + +#ifdef KLU } +#endif + if(node->ptr == NULL) return(E_NOMEM); ckt->CKThadNodeset = 1; ckt->CKTrhsOld[node->number] = ckt->CKTrhs[node->number] = node->nodeset; } if(node->icGiven) { if(! ( node->ptr)) { + +#ifdef KLU if (ckt->CKTkluMODE) { node->ptr = (double *) SMPfindElt (ckt->CKTmatrix, node->number, node->number, 0) ; if (node->ptr == NULL) { @@ -47,8 +57,14 @@ CKTic(CKTcircuit *ckt) printf ("Please specify an existing element for .ic\n") ; } } else { +#endif + node->ptr = SMPmakeElt(ckt->CKTmatrix,node->number, node->number); + +#ifdef KLU } +#endif + if(node->ptr == NULL) return(E_NOMEM); } ckt->CKTrhsOld[node->number] = ckt->CKTrhs[node->number] = node->ic;