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

call to nupa_done() to release memory

This commit is contained in:
h_vogt 2009-04-05 18:31:25 +00:00
parent faada68e9d
commit 3f7201376c
3 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ChangeLog
View File

@ -2,8 +2,10 @@
* com_fft.c, inpcom.c, variable.c, variable.h, resource.c, cpitf.c, * com_fft.c, inpcom.c, variable.c, variable.h, resource.c, cpitf.c,
plotit.c, inpgtok.c: plotit.c, inpgtok.c:
some more memory leaks removed some more memory leaks removed
spicenum.c: release of memory for dico->dyncategory corrected * spicenum.c: release of memory for dico->dyncategory corrected
subckt.c, inp.c, inpcom.c more on memory leaks * subckt.c, inp.c, inpcom.c: more on memory leaks
* subckt.c, spicenum.c: make call to fcn nupa_done() at the end of
fcn inp_subcktexpand() to clear memory.
2009-04-01 Dietmar Warning 2009-04-01 Dietmar Warning
* frontend/resource.c, misc/misc_time.c: init of rusage structure to prevent * frontend/resource.c, misc/misc_time.c: init of rusage structure to prevent

2
src/frontend/numparam/spicenum.c
View File

@ -630,7 +630,7 @@ nupa_copy (char *s, int linenum)
pscopy (u, s, 1, ls); /* strip trailing space, CrLf and so on */ pscopy (u, s, 1, ls); /* strip trailing space, CrLf and so on */
dico->srcline = linenum; dico->srcline = linenum;
if ((!inexpansion) && (linenum >= 0) && (linenum < dynmaxline)) if ((!inexpansion) && (linenum >= 0) && (linenum <= dynmaxline))
{ {
linecount++; linecount++;
dico->dynrefptr[linenum] = s; dico->dynrefptr[linenum] = s;

5
src/frontend/subckt.c
View File

@ -184,7 +184,7 @@ inp_subcktexpand(struct line *deck)
c= c->li_next; c= c->li_next;
} }
c=deck; c=deck;
while ( c != NULL) { /* first Numparam pass */ while ( c != NULL) { /* first Numparam pass */
c->li_line = nupa_copy(c->li_line, c->li_linenum); c->li_line = nupa_copy(c->li_line, c->li_linenum);
c= c->li_next; c= c->li_next;
} }
@ -344,9 +344,10 @@ inp_subcktexpand(struct line *deck)
c= c->li_next; c= c->li_next;
} }
#endif /* TRACE */ #endif /* TRACE */
//ok= ok && nupa_signal(NUPAEVALDONE, NULL);
//nupa_list_params(stdout); //nupa_list_params(stdout);
nupa_copy_inst_dico(); nupa_copy_inst_dico();
ok= ok && nupa_signal(NUPAEVALDONE, NULL);
} }
return (ll); /* return the spliced deck. */ return (ll); /* return the spliced deck. */
} }