Don't do optran, if command optran is not given.
This commit is contained in:
parent
711157e85d
commit
7f1fdd3934
|
|
@ -45,6 +45,7 @@ static int OPbreakSize;
|
||||||
static double opfinaltime = 1e-6;
|
static double opfinaltime = 1e-6;
|
||||||
static double opstepsize = 1e-8;
|
static double opstepsize = 1e-8;
|
||||||
static double opramptime = 0.;
|
static double opramptime = 0.;
|
||||||
|
static bool nooptran = TRUE;
|
||||||
|
|
||||||
/* command to set the 6 optran flags
|
/* command to set the 6 optran flags
|
||||||
CKTnoOpIter (default 0, set by 'option noopiter')
|
CKTnoOpIter (default 0, set by 'option noopiter')
|
||||||
|
|
@ -68,6 +69,7 @@ void com_optran(wordlist* wl) {
|
||||||
fprintf(cp_err, "Error: no circuit loaded\n");
|
fprintf(cp_err, "Error: no circuit loaded\n");
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
nooptran = FALSE;
|
||||||
/* wordlist with 6 parameters */
|
/* wordlist with 6 parameters */
|
||||||
optrancom = strtol(wltmp->wl_word, &stpstr, 10);
|
optrancom = strtol(wltmp->wl_word, &stpstr, 10);
|
||||||
if ((errno == ERANGE) || (*stpstr != '\0'))
|
if ((errno == ERANGE) || (*stpstr != '\0'))
|
||||||
|
|
@ -240,6 +242,11 @@ OPtran(CKTcircuit *ckt)
|
||||||
#if defined SHARED_MODULE
|
#if defined SHARED_MODULE
|
||||||
int redostep;
|
int redostep;
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
|
/* if optran command has not been given (in .spiceinit or in .control section,
|
||||||
|
we don' use optran */
|
||||||
|
if (nooptran)
|
||||||
|
return 1;
|
||||||
/*
|
/*
|
||||||
ACAN *acjob = (ACAN *) ckt->CKTcurJob;
|
ACAN *acjob = (ACAN *) ckt->CKTcurJob;
|
||||||
TRANan *trjob = (TRANan *) ckt->CKTcurJob;
|
TRANan *trjob = (TRANan *) ckt->CKTcurJob;
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue