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

doit, shrink scope of `lcc', drop an unused `lcc' assignment at the scopes tail

This commit is contained in:
rlar 2012-03-08 19:54:13 +01:00
parent 8f73a4dd23
commit 091a83019a
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/frontend/subckt.c
View File

@ -396,7 +396,7 @@ inp_subcktexpand(struct line *deck) {
/*-------------------------------------------------------------------*/
static struct line *
doit(struct line *deck) {
struct line *c, *lcc;
struct line *c;
struct subs *sssfree = NULL, *sss = NULL; /* *sss temporarily hold decks to substitute */
int nest, numpasses = MAXNEST;
bool gotone;
@ -421,6 +421,8 @@ doit(struct line *deck) {
/* First pass: xtract all the .subckts and stick pointers to them into sss. */
for (last = deck, lc = NULL; last; ) {
struct line *lcc;
if (ciprefix(sbend, last->li_line)) { /* if line == .ends */
fprintf(cp_err, "Error: misplaced %s line: %s\n", sbend,
last->li_line);
@ -498,7 +500,6 @@ doit(struct line *deck) {
sss->su_next = subs;
subs = sss; /* Now that sss is built, assign it to subs */
last = c->li_next;
lcc = subs->su_def;
/*gp */
c->li_next = NULL; /* Numparam needs line c */
@ -548,6 +549,7 @@ doit(struct line *deck) {
char *tofree, *tofree2, *s, *t;
char *scname, *subname;
struct line *lcc;
gotone = TRUE;
t = tofree = s = copy(c->li_line); /* s & t hold copy of component line */