testsuite/systemtap.base/optim.exp


1
2
3
4
5
6
7
8
9
10
11
12
13

set test "optim"
if {![installtest_p]} { untested $test; return }
spawn stap $srcdir/$subdir/optim.stp
set ok 0
expect {
	-timeout 120
	-re {i=1} { incr ok }
	timeout { fail "$test (timeout)" }
	eof { }
}
close
wait
if {$ok == 1} { pass $test } { fail $test }