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

subckt.c, doit(), rename `lc' --> `prev_of_c'

This commit is contained in:
rlar 2014-07-18 17:53:43 +02:00
parent 73935377ff
commit 5944a2505a
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/frontend/subckt.c
View File

@ -542,7 +542,7 @@ doit(struct line *deck, wordlist *modnames) {
/* Second pass: do the replacements. */
do { /* while (!error && numpasses-- && gotone) */
struct line *c = deck;
struct line *lc = NULL;
struct line *prev_of_c = NULL;
gotone = FALSE;
while (c) {
if (ciprefix(invoke, c->li_line)) { /* found reference to .subckt (i.e. component with refdes X) */
@ -590,7 +590,7 @@ doit(struct line *deck, wordlist *modnames) {
* instance of a subckt that is defined above at higher level.
*/
if (!sss) {
lc = c;
prev_of_c = c;
c = c->li_next;
tfree(tofree);
tfree(tofree2);
@ -621,8 +621,8 @@ doit(struct line *deck, wordlist *modnames) {
struct line *savenext = c->li_next;
if (use_numparams == FALSE) {
/* old style: c will drop a dangling pointer: memory leak */
if (lc)
lc->li_next = lcc;
if (prev_of_c)
prev_of_c->li_next = lcc;
else
deck = lcc;
} else {
@ -635,12 +635,12 @@ doit(struct line *deck, wordlist *modnames) {
lcc->li_next = savenext;
}
c = lcc->li_next;
lc = lcc;
prev_of_c = lcc;
tfree(tofree);
tfree(tofree2);
} /* if (ciprefix(invoke, c->li_line)) . . . */
else {
lc = c;
prev_of_c = c;
c = c->li_next;
}
}