File: optim.exp

package info (click to toggle)
systemtap 1.2-5%2Bsqueeze1
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 13,972 kB
  • ctags: 7,842
  • sloc: ansic: 35,121; cpp: 29,336; exp: 7,535; xml: 6,878; sh: 6,719; perl: 2,067; tcl: 821; makefile: 545; python: 473; ruby: 419
file content (14 lines) | stat: -rw-r--r-- 298 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
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 ; exp_continue }
	-re {j=2} { incr ok }
	timeout { fail "$test (timeout)" }
	eof { }
}
close
wait
if {$ok == 2} { pass $test } { fail $test }