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

Prepend title line by '*' if printed by 'listing r'. 

This allows skipping all pre-processing.
This commit is contained in:
Holger Vogt 2023-09-27 15:51:16 +02:00
parent 76f837b0b7
commit e449c894ce
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/frontend/inp.c
View File

@ -179,8 +179,11 @@ com_listing(wordlist *wl)
} else {
if (type != LS_DECK && type != LS_RUNNABLE)
fprintf(cp_out, "\t%s\n\n", ft_curckt->ci_name);
else if (type == LS_RUNNABLE)
else if (type == LS_RUNNABLE) {
fprintf(cp_out, "* expanded deck of %s\n", ft_curckt->ci_name);
fprintf(cp_out, "* %s\n", ft_curckt->ci_deck->line); /* title line with extra '*' */
ft_curckt->ci_deck = ft_curckt->ci_deck->nextcard; /* skip title */
}
inp_list(cp_out,
expand ? ft_curckt->ci_deck : ft_curckt->ci_origdeck,
ft_curckt->ci_options, type);