numparam/xpressn.c, evaluate(), drop `dt'
This commit is contained in:
parent
00c3d2f79e
commit
e970e8c4ea
|
|
@ -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;
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue