From 6e5ef92fd2bbabb6d8ad950e0760fe6c4ef04f63 Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Sun, 15 May 2016 19:46:20 +0200
Subject: [PATCH] nupa_subcktcall(), 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 1424cd574..fffc12fb4 100644
--- a/src/frontend/numparam/xpressn.c
+++ b/src/frontend/numparam/xpressn.c
@@ -1531,7 +1531,7 @@ nupa_subcktcall(dico_t *dico, char *s, char * const x, char * const inst_name)
     if (i >= 0) {
         const char *optr, *jptr;
 
-        pscopy(&tstr, spice_dstring_value(&tstr), i + 7, (int) strlen(spice_dstring_value(&tstr) + i + 7));
+        pscopy(&tstr, spice_dstring_value(&tstr) + i + 7, 0, (int) strlen(spice_dstring_value(&tstr) + i + 7));
 
         /* search identifier to the left of '=' assignments */