1
2
3
4
5
6
7
8
9
10
11
12
13
|
#!/bin/sh
#----------------------------------------------------------------------
# $Revision$
#----------------------------------------------------------------------
# the next line restarts using tclsh \
exec tclsh8.5 "$0" "$@"
set testScript [file normalize [file join [pwd] [info script]]]
set testDir [file dirname $testScript]
lappend auto_path eskil.vfs/lib
package require tcltest 2.2
|
|
|
1
2
3
4
5
6
7
8
9
10
11
12
13
|
#!/bin/sh
#----------------------------------------------------------------------
# $Revision$
#----------------------------------------------------------------------
# the next line restarts using tclsh \
exec tclsh "$0" "$@"
set testScript [file normalize [file join [pwd] [info script]]]
set testDir [file dirname $testScript]
lappend auto_path eskil.vfs/lib
package require tcltest 2.2
|