Eskil

Differences From Artifact [017d16e8be]:

• Executable file tests/all.tcl — part of check-in [1c9b32bade] at 2004-05-18 19:17:50 on branch trunk — Clean up after instrument. (user: peter size: 1313)

To Artifact [70dd4ecb74]:

• Executable file tests/all.tcl — part of check-in [825845a743] at 2005-01-27 22:47:41 on branch trunk — Added more instrumenting. (user: peter size: 1338)

20
21
22
23
24
25
26
27
28
29
30
31
32
33
34

wm withdraw .

set ::eskil_testsuite 1

set instrument 1
if {$instrument} {
    puts "Instrumenting"
    exec ./instrument.tcl compareBlocks
    source eskili.tcl
} else {
    source eskil.tcl
}
puts "Running Tests"

foreach test [glob -nocomplain $testDir/*.test] {

|

20
21
22
23
24
25
26
27
28
29
30
31
32
33
34

wm withdraw .

set ::eskil_testsuite 1

set instrument 1
if {$instrument} {
    puts "Instrumenting"
    exec ./instrument.tcl compareBlocks ParseCtRevs compareFiles
    source eskili.tcl
} else {
    source eskil.tcl
}
puts "Running Tests"

foreach test [glob -nocomplain $testDir/*.test] {