From ee269e437dc87b76a4ca43be41af4aaf230b8187 Mon Sep 17 00:00:00 2001
From: h_vogt <h_vogt>
Date: Sat, 29 Oct 2016 14:09:45 +0200
Subject: [PATCH] cpitf.c, save information on ngspice.exe into variables (MS
 Visula Studio only)

---
 src/frontend/cpitf.c | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/src/frontend/cpitf.c b/src/frontend/cpitf.c
index b61ea9741..c273c9ce5 100644
--- a/src/frontend/cpitf.c
+++ b/src/frontend/cpitf.c
@@ -244,6 +244,23 @@ ft_cpinit(void)
 
         /* Now source the standard startup file spinit or tclspinit. */
 
+        /* set variables to read program configuration into spinit for VS */
+#ifdef _MSC_VER
+#ifdef CONFIG64
+#ifdef NGDEBUG
+        cp_vset("pg_config", CP_STRING, "d64");
+#else
+        cp_vset("pg_config", CP_STRING, "r64");
+#endif
+#else
+#ifdef NGDEBUG
+        cp_vset("pg_config", CP_STRING, "d32");
+#else
+        cp_vset("pg_config", CP_STRING, "r32");
+#endif
+#endif
+#endif
+
         /* jump over leading spaces */
         for (copys = s = cp_tildexpand(Lib_Path); copys && *copys; ) {
             s = skip_ws(s);