From 10e9760f13d0795a3706de187eddbe684679beb5 Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Sun, 8 May 2016 18:56:29 +0200
Subject: [PATCH] defsubckt(), transform pscopy(,x,y,) --> pscopy(,x+y,y-y,)
 (requirement strlen(x) >= y to be verified later)

---
 src/frontend/numparam/xpressn.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/frontend/numparam/xpressn.c b/src/frontend/numparam/xpressn.c
index 230271f38..baf5cdda1 100644
--- a/src/frontend/numparam/xpressn.c
+++ b/src/frontend/numparam/xpressn.c
@@ -533,7 +533,7 @@ defsubckt(dico_t *dico, struct card *card, nupa_type categ)
     if (j_ptr > i_ptr) {
         SPICE_DSTRING ustr;     /* temp user string */
         spice_dstring_init(&ustr);
-        pscopy_up(&ustr, s, (int) (i_ptr - s), (int) (j_ptr - i_ptr));
+        pscopy_up(&ustr, i_ptr, 0, (int) (j_ptr - i_ptr));
         err = nupa_define(dico, spice_dstring_value(&ustr), ' ', categ, 0.0, w, NULL);
         spice_dstring_free(&ustr);
     } else {