diff options
Diffstat (limited to 'testsuite/systemtap.context/args.tcl')
| -rw-r--r-- | testsuite/systemtap.context/args.tcl | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/testsuite/systemtap.context/args.tcl b/testsuite/systemtap.context/args.tcl index bbac1a4b..6c14c4b7 100644 --- a/testsuite/systemtap.context/args.tcl +++ b/testsuite/systemtap.context/args.tcl @@ -8,6 +8,7 @@ expect { "yyy_int -1 200 300\r\nyyy_int returns 499\r\n" { pass "integer function arguments" } + timeout {fail "integer function arguments"} } exec echo 2 > /proc/stap_test_cmd expect { @@ -15,6 +16,7 @@ expect { "yyy_uint 4294967295 200 300\r\nyyy_uint returns 499\r\n" { pass "unsigned function arguments" } + timeout {fail "unsigned function arguments"} } exec echo 3 > /proc/stap_test_cmd expect { @@ -22,6 +24,7 @@ expect { "yyy_long -1 200 300\r\nyyy_long returns 499\r\n" { pass "long function arguments" } + timeout {fail "long function arguments"} } exec echo 4 > /proc/stap_test_cmd expect { @@ -29,13 +32,15 @@ expect { "yyy_int64 -1 200 300\r\nyyy_int64 returns 499\r\n" { pass "int64 function arguments" } + timeout {fail "int64 function arguments"} } exec echo 5 > /proc/stap_test_cmd expect { -timeout 5 - "yyy_char 97 98 99\r\nyyy_char returns 81\r\n" { + "yyy_char a b c\r\nyyy_char returns Q\r\n" { pass "char function arguments" } + timeout {fail "char function arguments"} } exec echo 6 > /proc/stap_test_cmd expect { @@ -43,9 +48,10 @@ expect { "yyy_str Hello-System-Tap\r\nyyy_str returns XYZZY\r\n" { pass "string function arguments" } + timeout {fail "string function arguments"} } } - eof {} + eof {fail "function arguments: unexpected timeout"} } send "\003" close |