|
|
|
@ -1385,12 +1385,8 @@ getexpress(const char * const s, SPICE_DSTRINGPTR tstr_p, const char **pi) |
|
|
|
if (c == '(') { |
|
|
|
/* sub-formula */ |
|
|
|
int level = 1; |
|
|
|
do |
|
|
|
{ |
|
|
|
p++; |
|
|
|
|
|
|
|
if (p >= ls_ptr) |
|
|
|
break; |
|
|
|
p++; |
|
|
|
for (; p < ls_ptr; p++) { |
|
|
|
|
|
|
|
d = *p; |
|
|
|
|
|
|
|
@ -1401,7 +1397,7 @@ getexpress(const char * const s, SPICE_DSTRINGPTR tstr_p, const char **pi) |
|
|
|
|
|
|
|
if (level <= 0) |
|
|
|
break; |
|
|
|
} while (1); |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
} while (!strchr(",;)}", c)); /* legal separators */ |
|
|
|
|