summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'sci-electronics/ngspice/files/ngspice-27-fix_parsing_tcl_commands.patch')
-rw-r--r--sci-electronics/ngspice/files/ngspice-27-fix_parsing_tcl_commands.patch16
1 files changed, 16 insertions, 0 deletions
diff --git a/sci-electronics/ngspice/files/ngspice-27-fix_parsing_tcl_commands.patch b/sci-electronics/ngspice/files/ngspice-27-fix_parsing_tcl_commands.patch
new file mode 100644
index 00000000000..bad336590df
--- /dev/null
+++ b/sci-electronics/ngspice/files/ngspice-27-fix_parsing_tcl_commands.patch
@@ -0,0 +1,16 @@
+--- a/src/tclspice.c
++++ b/src/tclspice.c
+@@ -828,10 +828,9 @@
+ int i;
+ NG_IGNORE(clientData);
+ save_interp();
+- /* Looks backwards through the first command and strips the :: part */
+- for (i = strlen(argv[0])-1; i > 0; i--)
+- if (argv[0][i] == *":")
+- argv[0] += i + 1;
++ char *prefix = strstr(argv[0], "spice::");
++ if (prefix)
++ argv[0] = prefix + 7;
+ return _run(argc, (char **)argv);
+ }
+