numparam/xpressn.c, evaluate(), drop `dt'

This commit is contained in:
rlar 2017-11-04 15:25:46 +01:00
parent 00c3d2f79e
commit e970e8c4ea
1 changed files with 2 additions and 5 deletions

View File

@ -1088,7 +1088,6 @@ evaluate(dico_t *dico, SPICE_DSTRINGPTR qstr_p, char *t, unsigned char mode)
/* transform t to result q. mode 0: expression, mode 1: simple variable */ /* transform t to result q. mode 0: expression, mode 1: simple variable */
double u = 0.0; double u = 0.0;
int j, lq; int j, lq;
nupa_type dt;
entry_t *entry; entry_t *entry;
bool numeric, done; bool numeric, done;
bool err; bool err;
@ -1106,13 +1105,11 @@ evaluate(dico_t *dico, SPICE_DSTRINGPTR qstr_p, char *t, unsigned char mode)
return message(dico, return message(dico,
"\"%s\" not evaluated. Lookup failure.\n", t); "\"%s\" not evaluated. Lookup failure.\n", t);
dt = entry->tp;
/* data type: Real or String */ /* data type: Real or String */
if (dt == NUPA_REAL) { if (entry->tp == NUPA_REAL) {
u = entry->vl; u = entry->vl;
numeric = 1; numeric = 1;
} else if (dt == NUPA_STRING) { } else if (entry->tp == NUPA_STRING) {
/* suppose source text "..." at */ /* suppose source text "..." at */
j = entry->ivl; j = entry->ivl;
lq = 0; lq = 0;