Browse Source

com_option.c, com_option(), cleanup, rename variables

pre-master-46
rlar 10 years ago
parent
commit
88ee1f9196
  1. 24
      src/frontend/com_option.c

24
src/frontend/com_option.c

@ -14,7 +14,7 @@
void
com_option(wordlist *wl)
{
struct variable *vars, *varsfree;
struct variable *vars, *v;
CKTcircuit *circuit = NULL;
@ -87,35 +87,35 @@ com_option(wordlist *wl)
return;
}
varsfree = vars = cp_setparse(wl);
vars = cp_setparse(wl);
/* This is sort of a hassle... */
while (vars) {
for (v = vars; v; v = v->va_next) {
void *s;
switch (vars->va_type) {
switch (v->va_type) {
case CP_BOOL:
s = &vars->va_bool;
s = &v->va_bool;
break;
case CP_NUM:
s = &vars->va_num;
s = &v->va_num;
break;
case CP_REAL:
s = &vars->va_real;
s = &v->va_real;
break;
case CP_STRING:
s = vars->va_string;
s = v->va_string;
break;
case CP_LIST:
s = vars->va_vlist;
s = v->va_vlist;
break;
default:
s = NULL;
}
/* qui deve settare le opzioni di simulazione */
cp_vset(vars->va_name, vars->va_type, s);
vars = vars->va_next;
cp_vset(v->va_name, v->va_type, s);
}
free_struct_variable(varsfree);
free_struct_variable(vars);
}
Loading…
Cancel
Save