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

inpcom.c, cleanup usage of free_function()

This commit is contained in:
rlar 2013-05-18 23:15:40 +02:00
parent 7e84a75ff7
commit 2b76a08190
1 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/frontend/inpcom.c
View File

@ -3072,7 +3072,7 @@ static void
inp_expand_macros_in_deck(struct line *deck)
{
struct line *c = deck;
int prev_num_functions = 0, i;
int prev_num_functions = 0;
while (c != NULL) {
if (*c->li_line == '*') {
@ -3086,11 +3086,10 @@ inp_expand_macros_in_deck(struct line *deck)
inp_expand_macros_in_func();
}
if (ciprefix(".ends", c->li_line)) {
if (prev_num_functions != num_functions) {
for (i = prev_num_functions; i < num_functions; i++)
free_function(& functions[i]);
num_functions = prev_num_functions;
}
int i;
for (i = prev_num_functions; i < num_functions; i++)
free_function(& functions[i]);
num_functions = prev_num_functions;
}
if (*c->li_line != '*')