subckt.c, doit(), cleanup

This commit is contained in:
rlar 2014-07-18 18:07:38 +02:00
parent 6b959952a3
commit f2abbf1528
1 changed files with 1 additions and 9 deletions

View File

@ -544,7 +544,7 @@ doit(struct line *deck, wordlist *modnames) {
struct line *c = deck;
struct line *prev_of_c = NULL;
gotone = FALSE;
while (c) {
for (; c; prev_of_c = c, c = c->li_next) {
if (ciprefix(invoke, c->li_line)) { /* found reference to .subckt (i.e. component with refdes X) */
char *tofree, *tofree2, *s, *t;
@ -590,8 +590,6 @@ doit(struct line *deck, wordlist *modnames) {
* instance of a subckt that is defined above at higher level.
*/
if (!sss) {
prev_of_c = c;
c = c->li_next;
tfree(tofree);
tfree(tofree2);
continue;
@ -637,13 +635,7 @@ doit(struct line *deck, wordlist *modnames) {
}
tfree(tofree);
tfree(tofree2);
prev_of_c = c;
c = c->li_next;
} /* if (ciprefix(invoke, c->li_line)) . . . */
else {
prev_of_c = c;
c = c->li_next;
}
}
} while (!error && numpasses-- && gotone);