upgrade ngspice to v31

2 files changed, 109 insertions, 0 deletions

diff --git a/Windows/spice/examples/control_structs/if-batchmode.cir b/Windows/spice/examples/control_structs/if-batchmode.cir
new file mode 100644
index 00000000..b26b345c
--- /dev/null
+++ b/Windows/spice/examples/control_structs/if-batchmode.cir
@@ -0,0 +1,31 @@
+use $batchmode
+
+* use $batchmode variable to steer control flow
+*
+* start either with
+*    ngspice -b -r rawfile.raw if-batchmode.cir
+* or with
+*    ngspice if-batchmode.cir
+
+v0  1 0  dc 1
+R1  1 2  1k
+C1  2 0  1u
+
+.tran 100u 10m uic
+.print tran all
+
+.control
+
+if $?batchmode
+  echo "Info: batchmode has been set by command line option -b"
+  echo
+else
+  echo "Info: batchmode has not been set"
+  echo
+  unset ngdebug
+  tran 100u 10m uic
+  plot v(2)
+end
+
+.endc
+.end
diff --git a/Windows/spice/examples/control_structs/if-test-1.cir b/Windows/spice/examples/control_structs/if-test-1.cir
new file mode 100644
index 00000000..41927bdf
--- /dev/null
+++ b/Windows/spice/examples/control_structs/if-test-1.cir
@@ -0,0 +1,78 @@
+test if conditions
+
+* test behaviour in special circumstances
+
+v1  1 0  dc 42
+R1  1 0  1k
+
+
+.control
+
+echo "expect Error: missing if condition"
+* does not enter cp_istrue()
+if
+  echo "FAIL: you should not see this"
+else
+  echo "nonetheless evaluated as FALSE"
+end
+echo
+
+set testvar_b=""
+echo "expect |false|"
+* in cp_istrue(): wl!=NULL names==NULL v==NULL
+if $testvar_b
+  echo "FAIL: you should not see this"
+else
+  echo "|false|"
+end
+echo
+
+set testvar_c
+echo "expect testvar_c=|TRUE|"
+* in cp_istrue(): wl!=NULL names!=NULL v!=NULL
+if $testvar_c
+  echo "testvar_c=|$testvar_c|"
+end
+echo
+
+echo "expect Error: testvar_d: no such variable."
+* in cp_istrue(): wl!=NULL then wl==NULL names==NULL v==NULL
+if $testvar_d
+  echo "FAIL: you should not see this"
+else
+  echo "nonetheless evaluated as FALSE"
+end
+echo
+
+echo "expect Error(parse.c--checkvalid): testvar_e: no such vector."
+* in cp_istrue(): wl!=NULL names==NULL v==NULL
+if testvar_e = 3.3
+  echo "FAIL: you should not see this"
+else
+  echo "nonetheless evaluated as FALSE"
+end
+echo
+
+let testvar_f = 3.5
+
+echo "expect |false|"
+if testvar_f = 3.3
+  echo "FAIL: you should not see this"
+else
+  echo "|false|"
+end
+echo
+
+echo "expect |true|"
+if testvar_f = 3.5
+  echo "|true|"
+else
+  echo "FAIL: you should not see this"
+end
+echo
+
+op
+print v(1)
+
+.endc
+.end