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

subckt.c, doit(): fix a memory leak

This commit is contained in:
rlar 2012-04-13 22:17:25 +02:00
parent dcde15afd2
commit e3402554f0
1 changed files with 14 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/frontend/subckt.c
View File

@ -401,6 +401,7 @@ doit(struct line *deck, wordlist *modnames) {
/* Save all the old stuff... */
struct subs *subs = NULL;
wordlist *submod = NULL;
wordlist *xmodnames = modnames;
#ifdef TRACE
/* SDB debug statement */
@ -595,6 +596,8 @@ doit(struct line *deck, wordlist *modnames) {
if (!sss) {
lc = c;
c = c->li_next;
tfree(tofree);
tfree(tofree2);
continue;
}
@ -656,7 +659,7 @@ doit(struct line *deck, wordlist *modnames) {
if (!numpasses) {
fprintf(cp_err, "Error: infinite subckt recursion\n");
return (NULL);
error = 1;
}
#ifdef TRACE
@ -675,11 +678,19 @@ doit(struct line *deck, wordlist *modnames) {
}
#endif
if(modnames != xmodnames) {
if(xmodnames && xmodnames->wl_prev) {
xmodnames->wl_prev->wl_next = NULL;
xmodnames->wl_prev = NULL;
}
wl_free(modnames);
}
wl_free(submod);
if (error)
return NULL; /* error message already reported; should free( ) */
// fixme, if modnames has changed, then something has been prepended to
// this list, we should free these prepended wordlists then.
/*
struct subs {