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

subs, subs === sssfree, drop sssfree, EXACT

This commit is contained in:
rlar 2012-03-11 21:37:37 +01:00
parent aa192231f8
commit 02fee87faf
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/frontend/subckt.c
View File

@ -396,7 +396,7 @@ inp_subcktexpand(struct line *deck) {
/*-------------------------------------------------------------------*/ /*-------------------------------------------------------------------*/
static struct line * static struct line *
doit(struct line *deck) { doit(struct line *deck) {
struct subs *sssfree = NULL, *sss = NULL; /* *sss temporarily hold decks to substitute */ struct subs *sss = NULL; /* *sss temporarily hold decks to substitute */
int numpasses = MAXNEST; int numpasses = MAXNEST;
bool gotone; bool gotone;
wordlist *tmodnames = modnames; wordlist *tmodnames = modnames;
@ -476,7 +476,7 @@ doit(struct line *deck) {
/* c is the terminating .ends card */ /* c is the terminating .ends card */
/* lcc is one card before, which is the last body card */ /* lcc is one card before, which is the last body card */
sssfree = sss = alloc(struct subs); sss = alloc(struct subs);
if ( use_numparams==FALSE ) if ( use_numparams==FALSE )
lcc->li_next = NULL; /* shouldn't we free some memory here????? */ lcc->li_next = NULL; /* shouldn't we free some memory here????? */
@ -696,9 +696,9 @@ doit(struct line *deck) {
struct subs *su_next; struct subs *su_next;
} ; } ;
*/ */
while(sssfree) { while (subs) {
struct subs *sss2 = sssfree; struct subs *sss2 = subs;
sssfree = sssfree->su_next; subs = subs->su_next;
tfree(sss2->su_name); tfree(sss2->su_name);
tfree(sss2->su_args); tfree(sss2->su_args);
line_free(sss2->su_def, TRUE); line_free(sss2->su_def, TRUE);