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

frontend/evaluate.c, apply_func(), reorder

This commit is contained in:
rlar 2015-12-23 10:56:12 +01:00
parent 6709ab900a
commit 8e50275345
1 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/frontend/evaluate.c
View File

@ -927,18 +927,19 @@ apply_func(struct func *func, struct pnode *arg)
if (!data)
return (NULL);
t = alloc(struct dvec);
ZERO(t, struct dvec);
t->v_flags = (v->v_flags & ~VF_COMPLEX & ~VF_REAL &
~VF_PERMANENT & ~VF_MINGIVEN & ~VF_MAXGIVEN);
t->v_flags |= type;
#ifdef FTEDEBUG
if (ft_evdb)
fprintf(cp_err,
"apply_func: func %s to %s len %d, type %d\n",
func->fu_name, v->v_name, len, type);
#endif
t = alloc(struct dvec);
ZERO(t, struct dvec);
t->v_flags = (v->v_flags & ~VF_COMPLEX & ~VF_REAL &
~VF_PERMANENT & ~VF_MINGIVEN & ~VF_MAXGIVEN);
t->v_flags |= type;
if (isreal(t))
t->v_realdata = (double *) data;
else