diff --git a/src/frontend/inpcom.c b/src/frontend/inpcom.c
index ff13a2225..13cf368fa 100644
--- a/src/frontend/inpcom.c
+++ b/src/frontend/inpcom.c
@@ -3990,7 +3990,6 @@ inp_split_multi_param_lines(struct line *deck, int line_num)
                 *end_param = keep;
                 curr_line = end_param;
             }
-            tmp_ptr = card->li_next;
             for (i = 0; i < counter; i++) {
                 struct line *x = xx_new_line(NULL, array[i], line_num++, 0);
 
@@ -4213,7 +4212,6 @@ inp_compat(struct line *card)
                         midline, lnumber + delta, lastlastno);
 
                 // insert new B source line immediately after current line
-                tmp_ptr = card->li_next;
                 for (i = 0; i < 2; i++) {
                     struct line *x = xx_new_line(NULL, ckt_array[i], 0, 0);
 
@@ -4272,7 +4270,6 @@ inp_compat(struct line *card)
                         title_tok, title_tok, str_ptr);
 
                 // insert new B source line immediately after current line
-                tmp_ptr = card->li_next;
                 for (i = 0; i < 2; i++) {
                     struct line *x = xx_new_line(NULL, ckt_array[i], 0, 0);
 
@@ -4399,7 +4396,6 @@ inp_compat(struct line *card)
                         midline, lnumber + delta, lastlastno);
 
                 // insert new B source line immediately after current line
-                tmp_ptr = card->li_next;
                 for (i = 0; i < 2; i++) {
                     struct line *x = xx_new_line(NULL, ckt_array[i], 0, 0);
 
@@ -4469,7 +4465,6 @@ inp_compat(struct line *card)
                         title_tok, title_tok, str_ptr);
 
                 // insert new B source line immediately after current line
-                tmp_ptr = card->li_next;
                 for (i = 0; i < 2; i++) {
                     struct line *x = xx_new_line(NULL, ckt_array[i], 0, 0);
 
@@ -4681,7 +4676,6 @@ inp_compat(struct line *card)
             tc1_ptr = NULL;
             tc2_ptr = NULL;
             // insert new B source line immediately after current line
-            tmp_ptr = card->li_next;
             for (i = 0; i < 3; i++) {
                 struct line *x = xx_new_line(NULL, ckt_array[i], 0, 0);
 
@@ -4793,7 +4787,6 @@ inp_compat(struct line *card)
             tc1_ptr = NULL;
             tc2_ptr = NULL;
             // insert new B source line immediately after current line
-            tmp_ptr = card->li_next;
             for (i = 0; i < 3; i++) {
                 struct line *x = xx_new_line(NULL, ckt_array[i], 0, 0);
 
@@ -4964,7 +4957,6 @@ inp_compat(struct line *card)
                 // remove white spaces
                 card->li_line = inp_remove_ws(curr_line);
                 // insert new B source line immediately after current line
-                tmp_ptr = card->li_next;
                 for (ii = paui; ii < pai; ii++) {
                     struct line *x = xx_new_line(NULL, ckt_array[ii], 0, 0);
 
@@ -5082,7 +5074,6 @@ inp_compat(struct line *card)
                 // remove white spaces
                 card->li_line = inp_remove_ws(curr_line);
                 // insert new B source line immediately after current line
-                tmp_ptr = card->li_next;
                 for (ii = paui; ii < pai; ii++) {
                     struct line *x = xx_new_line(NULL, ckt_array[ii], 0, 0);
 
@@ -5550,7 +5541,6 @@ inp_add_series_resistor(struct line *deck)
             sprintf(ckt_array[1], "R%s_intern__ %s_intern__ %s %s",
                     title_tok, node2, node2, rval);
             /* assemble new L and R lines */
-            tmp_ptr = card->li_next;
             for (i = 0; i < 2; i++) {
                 struct line *x = xx_new_line(NULL, ckt_array[i], 0, 0);