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, rem_tlist(), cleanup

This commit is contained in:
rlar 2016-11-05 14:56:45 +01:00
parent 3a27cb43ba
commit c8ce9d963d
1 changed files with 18 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
src/frontend/inp.c
View File

@ -1846,23 +1846,26 @@ set_tlist(struct circ *curckt)
void void
rem_tlist(void) rem_tlist(void)
{ {
struct pt_temper *dmtmp; struct pt_temper *p;
while (devtlist) {
dmtmp = devtlist->next; for (p = devtlist; p;) {
tfree(devtlist->expression); struct pt_temper *next_p = p->next;
wl_free(devtlist->wl); tfree(p->expression);
INPfreeTree((IFparseTree *) devtlist->pt); wl_free(p->wl);
tfree(devtlist); INPfreeTree((IFparseTree *) p->pt);
devtlist = dmtmp; tfree(p);
p = next_p;
} }
while (modtlist) { for (p = modtlist; p;) {
dmtmp = modtlist->next; struct pt_temper *next_p = p->next;
tfree(modtlist->expression); tfree(p->expression);
wl_free(modtlist->wl); wl_free(p->wl);
INPfreeTree((IFparseTree *) modtlist->pt); INPfreeTree((IFparseTree *) p->pt);
tfree(modtlist); tfree(p);
modtlist = dmtmp; p = next_p;
} }
devtlist = NULL;
modtlist = NULL;
} }
void void