Add function translatepoly()

src/frontend/inp.c

@@ -32,6 +32,7 @@ Author: 1985 Wayne A. Christopher
 #include "spiceif.h"
 #include "com_let.h"
 #include "com_commands.h"
+#include "translatepoly.h"
 
 #ifdef XSPICE
 #include "ngspice/ipctiein.h"
@@ -609,9 +610,11 @@ inp_spsource(FILE *fp, bool comfile, char *filename, bool intfile)
                 }
 
             /* Now handle translation of spice2c6 POLYs. */
-#ifdef XSPICE
+#ifdef XSPICE_
             /* Translate all SPICE 2G6 polynomial type sources */
             deck->nextcard = ENHtranslate_poly(deck->nextcard);
+#else
+            deck->nextcard = translatepoly(deck->nextcard);
 #endif
 
             line_free(deck->actualLine, FALSE);

visualc/vngspice.vcxproj

@@ -876,6 +876,7 @@
     <ClInclude Include="..\src\frontend\streams.h" />
     <ClInclude Include="..\src\frontend\subckt.h" />
     <ClInclude Include="..\src\frontend\terminal.h" />
+    <ClInclude Include="..\src\frontend\translatepoly.h" />
     <ClInclude Include="..\src\frontend\typesdef.h" />
     <ClInclude Include="..\src\frontend\variable.h" />
     <ClInclude Include="..\src\frontend\vectors.h" />
@@ -1480,6 +1481,7 @@
     <ClCompile Include="..\src\frontend\trannoise\1-f-code.c" />
     <ClCompile Include="..\src\frontend\trannoise\FastNorm3.c" />
     <ClCompile Include="..\src\frontend\trannoise\wallace.c" />
+    <ClCompile Include="..\src\frontend\translatepoly.c" />
     <ClCompile Include="..\src\frontend\typesdef.c" />
     <ClCompile Include="..\src\frontend\variable.c" />
     <ClCompile Include="..\src\frontend\vectors.c" />