diff options
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.patch | 16 |
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 000000000000..bad336590dfa --- /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); + } + |