From 96f3b7b0292a010b1d91d9a374154ae5dc71a3e6 Mon Sep 17 00:00:00 2001
From: Holger Vogt <holger.vogt@uni-due.de>
Date: Tue, 13 Nov 2018 19:43:38 +0100
Subject: [PATCH] bug 380, fix removal of string vector after setting the model
 parameters

---
 src/xspice/mif/mifgetmod.c | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/xspice/mif/mifgetmod.c b/src/xspice/mif/mifgetmod.c
index fec937312..b38c279dd 100644
--- a/src/xspice/mif/mifgetmod.c
+++ b/src/xspice/mif/mifgetmod.c
@@ -207,8 +207,13 @@ char *MIFgetMod(
                                 tfree(val->v.vec.rVec);
                             if (vtype == IF_CPLXVEC)
                                 tfree(val->v.vec.cVec);
-                            if (vtype == IF_STRING || vtype == IF_STRINGVEC)
+                            if (vtype == IF_STRING)
                                 tfree(val->sValue);
+                            if (vtype == IF_STRINGVEC) {
+                                for (i = 0; i < val->v.numValue; i++)
+                                    tfree(val->v.vec.sVec[i]);
+                                tfree(val->v.vec.sVec);
+                            }
                             if(error)
                                 return(INPerror(error));
                             break;