luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

command.c, inpcom.c, add command 'setcs': like command 'set', 

but case sensitive, and thus keeping upper or lower case
of subsequently following variable name and other letters.
This commit is contained in:
h_vogt 2016-12-03 00:45:17 +01:00 committed by Holger Vogt
parent 23402a01cc
commit 15542990bb
4 changed files with 12 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
examples/Monte_Carlo/MC_2_control.sp
View File

@ -2,7 +2,7 @@
* Perform Monte Carlo simulation in ngspice
* script for use with 25 stage Ring-Osc. BSIM3
* circuit is in MC_2_circ.sp
* edit 'set sourcepath' for your path to circuit file
* edit 'setcs sourcepath' for your path to circuit file
* start script by 'ngspice -o MC_2_control.log MC_2_control.sp'
*
.control
@ -10,7 +10,7 @@
let run = 1 $ number of the actual run
* Where to find the circuit netlist file MC_2_circ.sp
set sourcepath = ( D:\Spice_general\ngspice\examples\Monte_Carlo )
setcs sourcepath = ( D:\Spice_general\ngspice\examples\Monte_Carlo )
* create file for frequency information
echo Monte Carlo, frequency of R.O. > MC_frequ.log

2
examples/Monte_Carlo/MC_ring_ts.sp
View File

@ -30,7 +30,7 @@ begin
echo source the input file
* Path of your circuit file and library file here
* Will be added to the already existing sourcepath
set sourcepath = ( $inputdir $sourcepath ./ngspice/examples/Monte_Carlo )
setcs sourcepath = ( $inputdir $sourcepath ./ngspice/examples/Monte_Carlo )
* source with file name of your circuit file
source mc_ring_circ.net

10
src/frontend/commands.c
View File

@ -127,7 +127,10 @@ struct comm spcp_coms[] = {
{ 020000, 020000, 020000, 020000 }, E_DEFHMASK, 0, LOTS,
arg_set,
"[option] [option = value] ... : Set a variable." } ,
{ "setcs", com_set, FALSE, TRUE,
{ 020000, 020000, 020000, 020000 }, E_DEFHMASK, 0, LOTS,
arg_set,
"[option] [option = value] ... : Set a variable, case remains as given." } ,
/* support for altering options in interactive mode,
using either command 'option' or 'options'*/
@ -634,7 +637,10 @@ struct comm nutcp_coms[] = {
{ 020000, 020000, 020000, 020000 }, E_DEFHMASK, 0, LOTS,
arg_set,
"[option] [option = value] ... : Set a variable." } ,
{ "setcs", com_set, FALSE, TRUE,
{ 020000, 020000, 020000, 020000 }, E_DEFHMASK, 0, LOTS,
arg_set,
"[option] [option = value] ... : Set a variable, case remains as given." } ,
#ifdef EXPERIMENTAL_CODE
/* PN support for altering options in interactive mode */
{ "option", com_option, TRUE, TRUE,

5
src/frontend/inpcom.c
View File

@ -963,11 +963,8 @@ inp_read(FILE *fp, int call_depth, char *dir_name, bool comfile, bool intfile)
!ciprefix("source", buffer) &&
!ciprefix("load", buffer) &&
!ciprefix("plot", buffer) &&
!ciprefix("print", buffer) &&
!ciprefix("asciiplot", buffer) &&
!ciprefix("gnuplot", buffer) &&
!ciprefix("hardcopy", buffer) &&
!(ciprefix("set", buffer) && strstr(buffer, "sourcepath"))
!ciprefix("setcf", buffer)
)
{
/* lower case for all other lines */