inp.c, add loop to remove linked lists devtlist, modtlist

This commit is contained in:
h_vogt 2016-11-05 12:54:28 +01:00 committed by rlar
parent d69179ce5e
commit 3a27cb43ba
1 changed files with 7 additions and 2 deletions

View File

@ -1846,17 +1846,22 @@ set_tlist(struct circ *curckt)
void void
rem_tlist(void) rem_tlist(void)
{ {
if (devtlist) { struct pt_temper *dmtmp;
while (devtlist) {
dmtmp = devtlist->next;
tfree(devtlist->expression); tfree(devtlist->expression);
wl_free(devtlist->wl); wl_free(devtlist->wl);
INPfreeTree((IFparseTree *) devtlist->pt); INPfreeTree((IFparseTree *) devtlist->pt);
tfree(devtlist); tfree(devtlist);
devtlist = dmtmp;
} }
if (modtlist) { while (modtlist) {
dmtmp = modtlist->next;
tfree(modtlist->expression); tfree(modtlist->expression);
wl_free(modtlist->wl); wl_free(modtlist->wl);
INPfreeTree((IFparseTree *) modtlist->pt); INPfreeTree((IFparseTree *) modtlist->pt);
tfree(modtlist); tfree(modtlist);
modtlist = dmtmp;
} }
} }