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

variables, clean up

This commit is contained in:
rlar 2016-08-03 21:18:44 +02:00
parent b2fb4e20bf
commit 20b666e2d5
1 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/frontend/variable.c
View File

@ -412,21 +412,22 @@ cp_remvar(char *varname)
for (p = &variables; *p; p = &(*p)->va_next) for (p = &variables; *p; p = &(*p)->va_next)
if (eq((*p)->va_name, varname)) if (eq((*p)->va_name, varname))
break; break;
if (*p == NULL) {
if (*p == NULL)
for (p = &uv1; *p; p = &(*p)->va_next) for (p = &uv1; *p; p = &(*p)->va_next)
if (eq((*p)->va_name, varname)) if (eq((*p)->va_name, varname))
break; break;
}
if (*p == NULL && ft_curckt) { if (*p == NULL && ft_curckt)
for (p = &ft_curckt->ci_vars; *p; p = &(*p)->va_next) for (p = &ft_curckt->ci_vars; *p; p = &(*p)->va_next)
if (eq((*p)->va_name, varname)) if (eq((*p)->va_name, varname))
break; break;
}
v = *p; v = *p;
if (!v) {
/* Gotta make up a var struct for cp_usrset()... */ /* make up an auxiliary struct variable for cp_usrset() */
if (!v)
v = var_alloc_num(copy(varname), 0, NULL); v = var_alloc_num(copy(varname), 0, NULL);
}
/* Note that 'unset history' doesn't do anything here... Causes /* Note that 'unset history' doesn't do anything here... Causes
* trouble... */ * trouble... */