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

Formatting

This commit is contained in:
Jim Monte 2020-01-12 21:02:19 -05:00 committed by Holger Vogt
parent 8ead6c1b77
commit 8afb9635c1
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/frontend/inp.c
View File

@ -522,14 +522,14 @@ inp_spsource(FILE *fp, bool comfile, char *filename, bool intfile)
}
}
endTime = seconds();
/* store input directory to a variable*/
/* store input directory to a variable */
if (fp) {
cp_vset("inputdir", CP_STRING, dir_name);
}
tfree(dir_name);
/* if nothing came back from inp_readall, e.g. after calling ngspice without parameters,
just close fp and return to caller */
just close fp and return to caller */
if (!deck) {
if (!intfile && fp)
fclose(fp);
@ -550,11 +550,13 @@ inp_spsource(FILE *fp, bool comfile, char *filename, bool intfile)
/* Save the title before INPgetTitle gets it. */
tt = copy(deck->line);
if (!deck->nextcard)
if (!deck->nextcard) {
fprintf(cp_err, "Warning: no lines in input\n");
}
}
if (fp && !intfile)
if (fp && !intfile) {
fclose(fp);
}
/* Now save the IO context and start a new control set. After we
are done with the source we'll put the old file descriptors
@ -600,14 +602,15 @@ inp_spsource(FILE *fp, bool comfile, char *filename, bool intfile)
ft_dotsaves();
} /* end if (comfile) */
else { /* must be regular deck . . . . */
else { /* must be regular deck . . . . */
/* loop through deck and handle control cards */
for (dd = deck->nextcard; dd; dd = ld->nextcard) {
/* get temp from deck */
if (ciprefix(".temp", dd->line)) {
s = skip_ws(dd->line + 5);
if (temperature)
if (temperature) {
txfree(temperature);
}
temperature = copy(s);
}
/* Ignore comment lines, but not lines begining with '*#',