|
|
@ -1340,13 +1340,12 @@ getexpress(const char * const s, SPICE_DSTRINGPTR tstr_p, const char **pi) |
|
|
returns tpe=='R' if (numeric, 'S' if (string only |
|
|
returns tpe=='R' if (numeric, 'S' if (string only |
|
|
*/ |
|
|
*/ |
|
|
{ |
|
|
{ |
|
|
const char *xia_ptr; |
|
|
|
|
|
|
|
|
const char *xia_ptr = *pi; |
|
|
const char *ls_ptr; |
|
|
const char *ls_ptr; |
|
|
const char *p = *pi - 1; |
|
|
|
|
|
|
|
|
const char *p; |
|
|
nupa_type tpe; |
|
|
nupa_type tpe; |
|
|
|
|
|
|
|
|
ls_ptr = s + strlen(s); |
|
|
ls_ptr = s + strlen(s); |
|
|
xia_ptr = p + 1; |
|
|
|
|
|
|
|
|
|
|
|
while ((xia_ptr < ls_ptr - 1) && (*xia_ptr <= ' ')) |
|
|
while ((xia_ptr < ls_ptr - 1) && (*xia_ptr <= ' ')) |
|
|
xia_ptr++; /*white space ? */ |
|
|
xia_ptr++; /*white space ? */ |
|
|
|