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

inp_fix_temper_in_param(), cleanup using 'skip_back_ws()'

This commit is contained in:
rlar 2014-07-08 18:32:50 +02:00
parent 6325a4b7ab
commit 63db630a0a
1 changed files with 3 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/frontend/inpcom.c
View File

@ -6217,25 +6217,17 @@ inp_fix_temper_in_param(struct line *deck)
*/
while ((*beg_tstr) != '=')
beg_tstr--;
beg_pstr = beg_tstr;
beg_pstr--;
/* go back over param name */
while(isspace(*beg_pstr))
beg_pstr--;
while(!isspace(*beg_pstr))
beg_pstr--;
beg_pstr = skip_back_non_ws(skip_back_ws(beg_tstr));
/* get function name from parameter name */
funcname = copy_substring(beg_pstr + 1, beg_tstr);
funcname = copy_substring(beg_pstr, beg_tstr);
/* find end of function body */
while (((*end_tstr) != '\0') && ((*end_tstr) != '='))
end_tstr++;
/* go back over next param name */
if (*end_tstr == '=') {
end_tstr = skip_back_non_ws(skip_back_ws(end_tstr));
end_tstr--;
while(isspace(*end_tstr))
end_tstr--;
while(!isspace(*end_tstr))
end_tstr--;
}
funcbody = copy_substring(beg_tstr + 1, end_tstr);