diff --git a/src/frontend/numparam/xpressn.c b/src/frontend/numparam/xpressn.c
index b0d69e54a..c9a291ac4 100644
--- a/src/frontend/numparam/xpressn.c
+++ b/src/frontend/numparam/xpressn.c
@@ -1658,11 +1658,10 @@ nupa_subcktcall(dico_t *dico, char *s, char * const x, char * const inst_name)
                     char * const idlist_p = spice_dstring_value(&idlist);
                     char *dollar = strchr(idlist_p, '$');
                     if (dollar) {
-                        int kk = (int) (dollar - idlist_p);
                         /* replace dollar with expression string u */
-                        pscopy(&vstr, idlist_p, 0, kk);
+                        pscopy(&vstr, idlist_p, 0, (int) (dollar - idlist_p));
                         sadd(&vstr, spice_dstring_value(&ustr));
-                        sadd(&vstr, idlist_p + kk + 1);
+                        sadd(&vstr, dollar + 1);
                         scopyd(&idlist, &vstr);
                     }
                     narg++;