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, tprint(), print levels correction to inp_add_levels()

This commit is contained in:
h_vogt 2016-04-23 18:47:09 +02:00 committed by rlar
parent 31a482fd84
commit 62b43e0257
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/frontend/inpcom.c
View File

@ -5692,8 +5692,14 @@ tprint(struct line *t, int numb)
/*debug: print into file*/
FILE *fd = fopen(filename, "w");
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);
if (*(tmp->li_line) != '*') {
fprintf(fd, "%6d %6d %s", tmp->li_linenum_orig, tmp->li_linenum, tmp->li_line);
fprintf(fd, " level: ");
struct nscope *x = tmp->level;
for (; x; x = x->next)
fprintf(fd, "/%p", tmp->level); /* fixme */
fprintf(fd, "\n");
}
fprintf(fd, "\n*********************************************************************************\n");
fprintf(fd, "*********************************************************************************\n");
fprintf(fd, "*********************************************************************************\n\n");