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

try to fix rem_tlist() 

Note:
  struct INPparseTree is an overlay of struct IFparseTree
  very ugly.
This commit is contained in:
rlar 2016-11-05 12:19:19 +01:00
parent c9517c397b
commit d69179ce5e
1 changed files with 12 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
src/frontend/inp.c
View File

@ -1820,12 +1820,16 @@ inp_parse_temper_trees(void)
{
struct pt_temper *d;
for(d = devtlist; d; d = d->next)
INPgetTree(&d->expression, &d->pt, ft_curckt->ci_ckt, NULL);
for(d = devtlist; d; d = d->next) {
char *expression = d->expression;
INPgetTree(&expression, &d->pt, ft_curckt->ci_ckt, NULL);
}
ft_curckt->devtlist = devtlist;
for(d = modtlist; d; d = d->next)
INPgetTree(&d->expression, &d->pt, ft_curckt->ci_ckt, NULL);
for(d = modtlist; d; d = d->next) {
char *expression = d->expression;
INPgetTree(&expression, &d->pt, ft_curckt->ci_ckt, NULL);
}
ft_curckt->modtlist = modtlist;
}
@ -1843,15 +1847,15 @@ void
rem_tlist(void)
{
if (devtlist) {
// tfree(devtlist->expression);
tfree(devtlist->expression);
wl_free(devtlist->wl);
/*should we remove the parse tree pt ?*/
INPfreeTree((IFparseTree *) devtlist->pt);
tfree(devtlist);
}
if (modtlist) {
// tfree(modtlist->expression);
tfree(modtlist->expression);
wl_free(modtlist->wl);
/*should we remove the parse tree pt ?*/
INPfreeTree((IFparseTree *) modtlist->pt);
tfree(modtlist);
}
}