1 set test "prologues -P"
2 if {! [installtest_p]} { untested $test } else {
4 spawn stap -P $srcdir/$subdir/prologues.stp
7 -re {read[^\r\n]*\r\n} { incr ok; exp_continue }
8 -re {write[^\r\n]*\r\n} { incr ok; exp_continue }
9 timeout { fail "$test (timeout)" }
13 if {$ok > 10} { pass $test } else { fail $test }
16 set test "prologues no-P"
17 if {! [installtest_p]} { untested $test } else {
19 spawn stap $srcdir/$subdir/prologues.stp
22 -re {read[^\r\n]*\r\n} { incr ok; exp_continue }
23 -re {write[^\r\n]*\r\n} { incr ok; exp_continue }
24 timeout { fail "$test (timeout)" }
28 if {$ok > 10} { pass $test } else { fail $test }