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

*** empty log message ***

This commit is contained in:
saintel 2008-11-30 12:47:07 +00:00
parent 1995fc0608
commit 84f3077eda
8 changed files with 23 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ChangeLog
View File

@ -1,3 +1,10 @@
2008-11-30
* configure.in: --with-tcl search path make broader to limit the need of the
optional argument. Message in case of tclConfig.sh file not found
fixed by sed.
* examples/tclspice/*/*.tcl: fixed load libspice lines due to the
directories hierarchy. (One level more)
2008-11-29 Holger Vogt
* frontend/numparam/xpressn.c: rand() and gauss() moved to
math/misc/randnumb.c

11
configure.in
View File

@ -317,16 +317,25 @@ if test "x$with_tcl" != "x" -a "$with_tcl" != "no" ; then
if test "x$tcl_config_sh" = "x" ; then
for dir in \
`ls -dr /usr/local/tcltk/tcl[[7-9]].[[0-9]]* 2>/dev/null` \
`ls -dr /usr/local/tcl/tcl[[7-9]].[[0-9]]* 2>/dev/null` \
`ls -dr /usr/local/tcl[[7-9]].[[0-9]]* 2>/dev/null` \
`ls -dr /usr/share/tcltk/tcl[[7-9]].[[0-9]]* 2>/dev/null` \
`ls -dr /usr/share/tcl/tcl[[7-9]].[[0-9]]* 2>/dev/null` \
`ls -dr /usr/share/tcl[[7-9]].[[0-9]]* 2>/dev/null` \
`ls -dr /usr/lib/tcl/tcl[[7-9]].[[0-9]]* 2>/dev/null` \
`ls -dr /usr/lib/tcl[[7-9]].[[0-9]]* 2>/dev/null` \
/usr/local/tcl \
/usr/local \
/usr \
/mingw
do
if test -r "$dir/tclConfig.sh" ; then
echo "Automatic research of tclConfig.sh Found one, accepting it and stopping research."
tcl_config_sh="$dir/tclConfig.sh"
break
elif test -r "$dir/lib/tclConfig.sh" ; then
echo "Automatic research of tclConfig.sh Found one, accepting it and stopping research."
tcl_config_sh="$dir/lib/tclConfig.sh"
break
fi
@ -340,7 +349,7 @@ AC_MSG_RESULT([${tcl_config_sh}])
if test "x$tcl_config_sh" = "x" ; then
echo "can't find Tcl configuration script \"tclConfig.sh\""
find /usr/lib/ -name 'tclConfig.sh' -exec echo "Should you add --with-tcl={} to ./configure arguments?" \;
find /usr/ -name 'tclConfig.sh' -exec echo "Should you add --with-tcl={} to ./configure arguments?" \; | sed -re "s/\/tclConfig.sh/ /"
exit 1
fi

2
examples/tclspice/tcl-testbench1/tcl-testbench1.tcl
View File

@ -5,7 +5,7 @@
# old name: analyse-20070504-0.tcl
package require BLT
load ../../src/.libs/libspice.so
load ../../../src/.libs/libspice.so
# Test of virtual capacitore circuit
# Vary the control voltage and log the resulting capacitance

2
examples/tclspice/tcl-testbench2/tcl-testbench2.tcl
View File

@ -4,7 +4,7 @@
###
package require BLT
load ../../src/.libs/libspice.so
load ../../../src/.libs/libspice.so
namespace import blt::*
wm title . "Vector Test script"

2
examples/tclspice/tcl-testbench3/tcl-testbench3.tcl
View File

@ -4,7 +4,7 @@
###
package require BLT
load ../../src/.libs/libspice.so
load ../../../src/.libs/libspice.so
source differentiate.tcl
spice::codemodel ../../src/xspice/icm/spice2poly/spice2poly.cm
proc temperatures_calc {temp_inf temp_sup points} {

2
examples/tclspice/tcl-testbench4/vspicechart.tcl
View File

@ -7,7 +7,7 @@
package require BLT
load "../../src/.libs/libspice.so"
load "../../../src/.libs/libspice.so"
source selectfromlist.tcl
source bltGraph.tcl

2
examples/tclspice/tcl/test_vectoblt.tcl
View File

@ -4,7 +4,7 @@
###
package require BLT
load ../../src/.libs/libspice.so
load ../../../src/.libs/libspice.so
spice::source "diffpair.cir"
spice::op

2
src/tclspice.c
View File

@ -17,7 +17,7 @@
#define TCLSPICE_prefix "spice::"
#define TCLSPICE_namespace "spice"
#ifdef _MSC_VER
#define TCLSPICE_version "17.1"
#define TCLSPICE_version "18.0"
#define STDIN_FILENO 0
#define STDOUT_FILENO 1
#define STDERR_FILENO 2