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, treat "0" and "null" like any other global node

This commit is contained in:
rlar 2014-07-26 20:17:42 +02:00
parent b9ecd4d28e
commit 24a22f1398
1 changed files with 6 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/frontend/subckt.c
View File

@ -140,6 +140,12 @@ collect_global_nodes(struct line *c)
{
num_global_nodes = 0;
global_nodes[num_global_nodes++] = copy("0");
#ifdef XSPICE
global_nodes[num_global_nodes++] = copy("null");
#endif
for (; c; c = c->li_next)
if (ciprefix(".global", c->li_line)) {
char *s = c->li_line;
@ -1438,21 +1444,11 @@ gettrans(const char *name, const char *name_end)
if (!name_end)
name_end = strchr(name, '\0');
#ifdef XSPICE
/* gtri - wbk - 2/27/91 - don't translate the reserved word 'null' */
if (eq_substr(name, name_end, "null"))
return ("null");
/* gtri - end */
#endif
/* Added by H.Tanaka to translate global nodes */
for (i = 0; i<num_global_nodes; i++)
if (eq_substr(name, name_end, global_nodes[i]))
return (global_nodes[i]);
if (eq_substr(name, name_end, "0"))
return ("0");
for (i = 0; table[i].t_old; i++)
if (eq_substr(name, name_end, table[i].t_old))
return (table[i].t_new);