Browse Source

document the goto labels.

pre-master-46
Holger Vogt 5 months ago
parent
commit
082b31018b
  1. 20
      src/spicelib/analysis/dctran.c

20
src/spicelib/analysis/dctran.c

@ -7,6 +7,13 @@ Modified: 2023 XSPICE breakpoint fix for shared ngspice by Vyacheslav Shevchuk
/* subroutine to do DC TRANSIENT analysis */ /* subroutine to do DC TRANSIENT analysis */
/* line goto label:
373 nextTime
515 resume
788 past_breakpoint
987 chkStep */
#include "ngspice/ngspice.h" #include "ngspice/ngspice.h"
#include "ngspice/cktdefs.h" #include "ngspice/cktdefs.h"
#include "cktaccept.h" #include "cktaccept.h"
@ -360,10 +367,9 @@ DCtran(CKTcircuit *ckt,
fprintf(stderr, "Couldn't relink rawfile\n"); fprintf(stderr, "Couldn't relink rawfile\n");
return error; return error;
} }
goto resume; /* line 517 */
goto resume; /* line 515 */
} }
/* 650 */
nextTime: nextTime:
/* begin LTRA code addition */ /* begin LTRA code addition */
@ -818,7 +824,7 @@ resume:
goto nextTime; /* line 373 */ goto nextTime; /* line 373 */
#else #else
redostep = 0; redostep = 0;
goto chkStep;
goto chkStep; /* line 987 */
#endif #endif
} }
newdelta = ckt->CKTdelta; newdelta = ckt->CKTdelta;
@ -845,7 +851,7 @@ resume:
EVTcall_hybrids(ckt); EVTcall_hybrids(ckt);
if (g_mif_info.breakpoint.current < ckt->CKTtime) { if (g_mif_info.breakpoint.current < ckt->CKTtime) {
/* A hybrid requested a breakpoint in the past. */ /* A hybrid requested a breakpoint in the past. */
goto past_breakpoint;
goto past_breakpoint; /* line 788 */
} }
} }
#endif #endif
@ -905,7 +911,7 @@ resume:
goto nextTime; /* line 373 */ goto nextTime; /* line 373 */
#else #else
redostep = 0; redostep = 0;
goto chkStep;
goto chkStep; /* line 987 */
#endif #endif
} else { } else {
/* not (newdelta > .9 * ckt->CKTdelta): reject the step /* not (newdelta > .9 * ckt->CKTdelta): reject the step
@ -991,11 +997,11 @@ chkStep:
olddelta_for_shared_sync = 0.0; olddelta_for_shared_sync = 0.0;
if(sharedsync(&ckt->CKTtime, &ckt->CKTdelta, olddelta_for_shared_sync, ckt->CKTfinalTime, if(sharedsync(&ckt->CKTtime, &ckt->CKTdelta, olddelta_for_shared_sync, ckt->CKTfinalTime,
ckt->CKTdelmin, redostep, &ckt->CKTstat->STATrejected, 1) == 0) ckt->CKTdelmin, redostep, &ckt->CKTstat->STATrejected, 1) == 0)
goto nextTime;
goto nextTime; /* line 373 */
#else #else
if(sharedsync(&ckt->CKTtime, &ckt->CKTdelta, olddelta, ckt->CKTfinalTime, if(sharedsync(&ckt->CKTtime, &ckt->CKTdelta, olddelta, ckt->CKTfinalTime,
ckt->CKTdelmin, redostep, &ckt->CKTstat->STATrejected, 1) == 0) ckt->CKTdelmin, redostep, &ckt->CKTstat->STATrejected, 1) == 0)
goto nextTime;
goto nextTime; /* line 373 */
#endif // XSPICE #endif // XSPICE
#endif // SHARED_MODULE #endif // SHARED_MODULE

Loading…
Cancel
Save