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

cleanup rem_tlist()

This commit is contained in:
rlar 2016-11-05 18:07:31 +01:00
parent 709512f733
commit 9b80badbd0
3 changed files with 5 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/frontend/inp.c
View File

@ -1833,19 +1833,9 @@ inp_parse_temper_trees(struct circ *circ)
/* remove the actual modtlist and devtlist */
void
rem_tlist(struct circ *circ)
rem_tlist(struct pt_temper *p)
{
struct pt_temper *p;
for (p = circ->devtlist; p;) {
struct pt_temper *next_p = p->next;
tfree(p->expression);
wl_free(p->wl);
INPfreeTree((IFparseTree *) p->pt);
tfree(p);
p = next_p;
}
for (p = circ->modtlist; p;) {
while (p) {
struct pt_temper *next_p = p->next;
tfree(p->expression);
wl_free(p->wl);

3
src/frontend/runcoms2.c
View File

@ -259,7 +259,8 @@ com_remcirc(wordlist *wl)
tfree(ft_curckt->ci_name);
if (ft_curckt->ci_filename)
tfree(ft_curckt->ci_filename);
rem_tlist(ft_curckt);
rem_tlist(ft_curckt->devtlist);
rem_tlist(ft_curckt->modtlist);
/* delete the actual circuit entry from ft_circuits */
for (p = ft_circuits; p; p = p->ci_next) {

2
src/include/ngspice/fteext.h
View File

@ -221,7 +221,7 @@ extern void mc_free(void);
void eval_seed_opt(struct line *deck);
extern char** circarray;
extern void rem_tlist(struct circ *curckt);
extern void rem_tlist(struct pt_temper *p);
/* nutinp.c */