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

This commit is contained in:
h_vogt 2013-09-11 17:27:33 +02:00 committed by rlar
parent ada308e916
commit 1edb51ccb7
1 changed files with 10 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
src/frontend/inpcom.c
View File

@ -6063,10 +6063,17 @@ tprint(struct line *t)
for (tmp = t; tmp; tmp = tmp->li_next)
if (*(tmp->li_line) != '*')
fprintf(fd, "%6d %6d %s\n", tmp->li_linenum_orig, tmp->li_linenum, tmp->li_line);
fprintf(fd, "\n*********************************************************************************\n\n");
fprintf(fd, "\n*********************************************************************************\n");
fprintf(fd, "*********************************************************************************\n");
fprintf(fd, "*********************************************************************************\n\n");
for (tmp = t; tmp; tmp = tmp->li_next)
fprintf(fd, "%6d %6d %s\n", tmp->li_linenum_orig, tmp->li_linenum, tmp->li_line);
fprintf(fd, "\n*********************************************************************************\n");
fprintf(fd, "*********************************************************************************\n");
fprintf(fd, "*********************************************************************************\n\n");
for (tmp = t; tmp; tmp = tmp->li_next)
if (*(tmp->li_line) != '*')
fprintf(fd, "%s\n",tmp->li_line);
fclose(fd);
}
@ -6267,8 +6274,7 @@ inp_fix_temper_in_param(struct line *deck)
continue;
if (sub_count[subckt_depth] != new_func->subckt_count)
continue;
// if (*curr_line != 'b')
// continue;
beg_str = curr_str = curr_line;
while ((beg_tstr = strstr(curr_str, new_func->funcname)) != NULL) {
/* start of token */
@ -6351,14 +6357,6 @@ inp_new_func(char *funcname, char *funcbody, struct line *card, struct func_temp
new_func_end = new_func_tmp;
}
/*
if (*new_func == NULL)
*new_func = new_func_tmp;
else {
new_func_tmp->next = *new_func;
*new_func = new_func_tmp;
}
*/
/* replace line in deck */
new_str = TMALLOC(char, strlen(funcname) + strlen(funcbody) + 10);
sprintf(new_str, ".func %s() %s", funcname, funcbody);