File: timeout.exp

package info (click to toggle)
systemtap 5.3-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 47,556 kB
  • sloc: cpp: 81,117; ansic: 54,933; xml: 49,795; exp: 43,595; sh: 11,526; python: 5,003; perl: 2,252; tcl: 1,312; makefile: 1,006; javascript: 149; lisp: 105; awk: 101; asm: 91; java: 70; sed: 16
file content (12 lines) | stat: -rw-r--r-- 357 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
 
set test "timeout option"
if {![installtest_p]} {untested $test; return}

set success 0
verbose -log "Running stap -T 1 -e \'probe end {println(\"terminated\")}\'"
spawn stap -T 1 -e "probe end {println(\"terminated\")}"
expect {
  -timeout 20
  -re "terminated" {incr success}
}
catch { close }; catch { wait }
if {$success == 1} {pass $test} {fail $test}