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, translate(), #6/8 cleanup

This commit is contained in:
rlar 2016-11-20 20:09:45 +01:00
parent 2a4c34c401
commit 49947e0279
1 changed files with 7 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
src/frontend/subckt.c
View File

@ -1011,33 +1011,33 @@ translate(struct line *deck, char *formal, char *actual, char *scname, const cha
case '[':
case ']':
case '~':
bxx_printf(&buffer, "%s ", name);
bxx_put_cstring(&buffer, name);
break;
case '%':
bxx_printf(&buffer, "%%");
bxx_putc(&buffer, '%');
/* don't translate the port type identifier */
if (name)
tfree(name);
name = next_name;
next_name = MIFgettok(&s);
bxx_printf(&buffer, "%s ", name);
bxx_put_cstring(&buffer, name);
break;
default:
/* must be a node name at this point, so translate it */
translate_node_name(&buffer, scname, name, NULL);
bxx_putc(&buffer, ' ');
break;
} /* switch */
bxx_putc(&buffer, ' ');
} /* while */
/* copy in the last token, which is the model name */
if (name) {
bxx_printf(&buffer, "%s", name);
bxx_put_cstring(&buffer, name);
tfree(name);
}
break; /* case 'a' */
@ -1137,26 +1137,10 @@ translate(struct line *deck, char *formal, char *actual, char *scname, const cha
goto quit;
}
if ((dev_type == 'f') || (dev_type == 'h')) {
/* Handle voltage source name */
#ifdef TRACE
/* SDB debug statement */
printf("In translate, found type f or h\n");
#endif
if ((dev_type == 'f') || (dev_type == 'h'))
translate_inst_name(&buffer, scname, name, NULL);
/* From Vsense and Urefdes creates V.Urefdes.sense */
} else { /* Handle netname */
#ifdef TRACE
/* SDB debug statement */
printf("In translate, found type e or g\n");
#endif
else
translate_node_name(&buffer, scname, name, NULL);
}
tfree(name);
bxx_putc(&buffer, ' ');
} /* while (nnodes--. . . . */