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

inpcom.c, inp_fix_subckt(), #3/4, drop 'last_param_card'

This commit is contained in:
rlar 2017-04-22 12:49:27 +02:00
parent 2aafc50608
commit c3e2c920ef
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/frontend/inpcom.c
View File

@ -2155,7 +2155,7 @@ find_name(struct names *p, char *name)
static char*
inp_fix_subckt(struct names *subckt_w_params, char *s)
{
struct line *head = NULL, *first_param_card = NULL, *last_param_card = NULL, *c = NULL;
struct line *head = NULL, *first_param_card = NULL, *c = NULL;
char *equal, *beg, *buffer, *ptr1, *ptr2, *new_str = NULL;
equal = strchr(s, '=');
@ -2177,6 +2177,7 @@ inp_fix_subckt(struct names *subckt_w_params, char *s)
head = insert_new_line(NULL, NULL, 0, 0);
/* create list of parameters that need to get sorted */
first_param_card = c = NULL;
while ((ptr1 = strchr(beg, '=')) != NULL) {
ptr2 = skip_ws(ptr1 + 1);
ptr1 = skip_back_ws(ptr1, beg);
@ -2195,7 +2196,7 @@ inp_fix_subckt(struct names *subckt_w_params, char *s)
beg = ptr2;
c = last_param_card = insert_new_line(last_param_card, copy_substring(ptr1, ptr2), 0, 0);
c = insert_new_line(c, copy_substring(ptr1, ptr2), 0, 0);
if (!first_param_card)
first_param_card = c;