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

inp.c, bug fix, need to reset modtlist/devtlist unconditionally

This commit is contained in:
rlar 2017-03-26 11:14:35 +02:00
parent 12de713ff5
commit c920946c73
1 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
src/frontend/inp.c
View File

@ -76,6 +76,13 @@ struct pt_temper {
struct pt_temper *next; struct pt_temper *next;
}; };
/* List of all expressions found in .model lines */
static struct pt_temper *modtlist = NULL;
/* List of all expressions found in device instance lines */
static struct pt_temper *devtlist = NULL;
/* /*
* create an unique artificial *unusable* FILE ptr * create an unique artificial *unusable* FILE ptr
* meant to be used with Xprintf() only to eventually * meant to be used with Xprintf() only to eventually
@ -552,6 +559,11 @@ inp_spsource(FILE *fp, bool comfile, char *filename, bool intfile)
cp_getvar("pretemp", CP_REAL, &testemp); cp_getvar("pretemp", CP_REAL, &testemp);
printf("test temperature %f\n", testemp); printf("test temperature %f\n", testemp);
} }
/* reset lists */
modtlist = NULL;
devtlist = NULL;
/* We are done handling the control stuff. Now process remainder of deck. /* We are done handling the control stuff. Now process remainder of deck.
Go on if there is something left after the controls.*/ Go on if there is something left after the controls.*/
if (deck->li_next) { if (deck->li_next) {
@ -1395,12 +1407,6 @@ dotifeval(struct line *deck)
} }
/* List of all expressions found in .model lines */
static struct pt_temper *modtlist = NULL;
/* List of all expressions found in device instance lines */
static struct pt_temper *devtlist = NULL;
/* /*
Evaluate expressions containing 'temper' keyword, found in Evaluate expressions containing 'temper' keyword, found in
.model lines or device instance lines. .model lines or device instance lines.