blob: b94a734e1c13c3f85b14f6626b7c41112e123341 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
package require tcltest
source test.setup
namespace import ::tcltest::*
foreach c {hasZlib hasSSL hasBz} {
testConstraint $c 1
}
proc defblock {name hexdata} {
upvar $name x
regsub -all { *} $hexdata {} hexdata
regsub -all "\n" $hexdata {} hexdata
# single long hex string now
set x $hexdata
}
configure -singleproc true -verbose bel
testsDirectory tests
runAllTests
|
