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

Re-format cktdojob.c

This commit is contained in:
Holger Vogt 2022-07-16 17:24:41 +02:00
parent 9e1eac0613
commit d1cbcb080c
1 changed files with 122 additions and 122 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
src/spicelib/analysis/cktdojob.c
View File

@ -23,12 +23,12 @@ Modified: 2000 AlansFixes
/* gtri - end - 12/12/90 */ /* gtri - end - 12/12/90 */
#endif #endif
extern SPICEanalysis *analInfo[]; extern SPICEanalysis* analInfo[];
int int
CKTdoJob(CKTcircuit *ckt, int reset, TSKtask *task) CKTdoJob(CKTcircuit* ckt, int reset, TSKtask* task)
{ {
JOB *job; JOB* job;
double startTime; double startTime;
int error, i, error2; int error, i, error2;
@ -75,7 +75,7 @@ CKTdoJob(CKTcircuit *ckt, int reset, TSKtask *task)
ckt->CKTdelmin = task->TSKdelmin; ckt->CKTdelmin = task->TSKdelmin;
ckt->CKTtrtol = task->TSKtrtol; ckt->CKTtrtol = task->TSKtrtol;
#ifdef XSPICE #ifdef XSPICE
/* Lower value of trtol to give smaller stepsize and more accuracy, /* Lower value of trtol to give smaller stepsize and more accuracy,
but only if there are 'A' devices in the circuit, but only if there are 'A' devices in the circuit,
may be overridden by 'set xtrtol=newval' */ may be overridden by 'set xtrtol=newval' */
if (ckt->CKTadevFlag && (ckt->CKTtrtol > 1)) { if (ckt->CKTadevFlag && (ckt->CKTtrtol > 1)) {
@ -135,8 +135,8 @@ CKTdoJob(CKTcircuit *ckt, int reset, TSKtask *task)
if (job->JOBtype == sens_num) { if (job->JOBtype == sens_num) {
senflag = 1; senflag = 1;
ckt->CKTcurJob = job; ckt->CKTcurJob = job;
ckt->CKTsenInfo = (SENstruct *) job; ckt->CKTsenInfo = (SENstruct*)job;
error = analInfo[sens_num]->an_func (ckt, reset); error = analInfo[sens_num]->an_func(ckt, reset);
} }
} }
@ -153,7 +153,7 @@ CKTdoJob(CKTcircuit *ckt, int reset, TSKtask *task)
#ifdef XSPICE #ifdef XSPICE
/* gtri - add - 12/12/90 - wbk - set ipc syntax error flag */ /* gtri - add - 12/12/90 - wbk - set ipc syntax error flag */
if(error) g_ipc.syntax_error = IPC_TRUE; if (error) g_ipc.syntax_error = IPC_TRUE;
/* gtri - end - 12/12/90 */ /* gtri - end - 12/12/90 */
#endif #endif
@ -162,7 +162,7 @@ CKTdoJob(CKTcircuit *ckt, int reset, TSKtask *task)
#ifdef XSPICE #ifdef XSPICE
/* gtri - add - 12/12/90 - wbk - set ipc syntax error flag */ /* gtri - add - 12/12/90 - wbk - set ipc syntax error flag */
if(error) g_ipc.syntax_error = IPC_TRUE; if (error) g_ipc.syntax_error = IPC_TRUE;
/* gtri - end - 12/12/90 */ /* gtri - end - 12/12/90 */
#endif #endif
@ -171,7 +171,7 @@ CKTdoJob(CKTcircuit *ckt, int reset, TSKtask *task)
#ifdef XSPICE #ifdef XSPICE
/* gtri - add - 12/12/90 - wbk - set ipc syntax error flag */ /* gtri - add - 12/12/90 - wbk - set ipc syntax error flag */
if(error) g_ipc.syntax_error = IPC_TRUE; if (error) g_ipc.syntax_error = IPC_TRUE;
/* gtri - end - 12/12/90 */ /* gtri - end - 12/12/90 */
#endif #endif
@ -179,8 +179,8 @@ CKTdoJob(CKTcircuit *ckt, int reset, TSKtask *task)
#ifdef XSPICE #ifdef XSPICE
/* gtri - add - 12/12/90 - wbk - return if syntax errors from parsing */ /* gtri - add - 12/12/90 - wbk - return if syntax errors from parsing */
if(g_ipc.enabled) { if (g_ipc.enabled) {
if(g_ipc.syntax_error) if (g_ipc.syntax_error)
; ;
else { else {
/* else, send (GO) errchk status if we got this far */ /* else, send (GO) errchk status if we got this far */
@ -210,18 +210,18 @@ CKTdoJob(CKTcircuit *ckt, int reset, TSKtask *task)
for (job = task->jobs; job; job = job->JOBnextJob) { for (job = task->jobs; job; job = job->JOBnextJob) {
if (job->JOBtype == i) { if (job->JOBtype == i) {
ckt->CKTcurJob=job; ckt->CKTcurJob = job;
error = OK; error = OK;
if (analInfo[i]->an_init) if (analInfo[i]->an_init)
error = analInfo[i]->an_init (ckt, job); error = analInfo[i]->an_init(ckt, job);
if (!error && analInfo[i]->do_ic) if (!error && analInfo[i]->do_ic)
error = CKTic(ckt); error = CKTic(ckt);
if (!error){ if (!error) {
#ifdef XSPICE #ifdef XSPICE
if(reset) { if (reset) {
/* gtri - begin - 6/10/91 - wbk - Setup event-driven data */ /* gtri - begin - 6/10/91 - wbk - Setup event-driven data */
error = EVTsetup(ckt); error = EVTsetup(ckt);
if(error) { if (error) {
ckt->CKTstat->STATtotAnalTime += ckt->CKTstat->STATtotAnalTime +=
SPfrontEnd->IFseconds() - startTime; SPfrontEnd->IFseconds() - startTime;
return(error); return(error);
@ -229,7 +229,7 @@ CKTdoJob(CKTcircuit *ckt, int reset, TSKtask *task)
/* gtri - end - 6/10/91 - wbk - Setup event-driven data */ /* gtri - end - 6/10/91 - wbk - Setup event-driven data */
} }
#endif #endif
error = analInfo[i]->an_func (ckt, reset); error = analInfo[i]->an_func(ckt, reset);
/* txl, cpl addition */ /* txl, cpl addition */
if (error == 1111) break; if (error == 1111) break;
} }