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

findsubname(), fix lvalues

This commit is contained in:
rlar 2017-11-22 22:31:14 +01:00
parent 90bb7cc289
commit c8340f2b4c
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/frontend/numparam/spicenum.c
View File

@ -190,10 +190,10 @@ findsubname(dico_t *dico, SPICE_DSTRINGPTR dstr_p)
entry_t *entry; entry_t *entry;
/* check for known subckt name */ /* check for known subckt name */
spice_dstring_reinit(&name); spice_dstring_reinit(&name);
int (t - s) = (int) (p - s - 1) + 1; char *t = s + (int) (p - s - 1) + 1;
while (alfanum(s[(t - s)])) { while (alfanum(s[(t - s)])) {
cadd(&name, toupper_c(s[(t - s)])); cadd(&name, toupper_c(s[(t - s)]));
(t - s)++; t++;
} }
entry = entrynb(dico, spice_dstring_value(&name)); entry = entrynb(dico, spice_dstring_value(&name));
if (entry && (entry->tp == NUPA_SUBCKT)) { if (entry && (entry->tp == NUPA_SUBCKT)) {