summaryrefslogtreecommitdiffstats
path: root/testsuite/systemtap.context/backtrace.tcl
diff options
context:
space:
mode:
authorFrank Ch. Eigler <fche@elastic.org>2008-02-15 14:29:08 -0500
committerFrank Ch. Eigler <fche@elastic.org>2008-02-15 14:29:08 -0500
commit0f05501579dc0a4e66ccbbd8e0b29d052d9b5920 (patch)
tree79bf8b7b328e87e8c30cc64e64a1bea9a6f2dca5 /testsuite/systemtap.context/backtrace.tcl
parent044427bcdfa2a1d58a912bf96546892bef82b717 (diff)
parent275f40a6d612f94e5272eeed772e9c9294cb8e1f (diff)
downloadsystemtap-steved-0f05501579dc0a4e66ccbbd8e0b29d052d9b5920.tar.gz
systemtap-steved-0f05501579dc0a4e66ccbbd8e0b29d052d9b5920.tar.xz
systemtap-steved-0f05501579dc0a4e66ccbbd8e0b29d052d9b5920.zip
Merge branch 'master' of git://sources.redhat.com/git/systemtap
Diffstat (limited to 'testsuite/systemtap.context/backtrace.tcl')
-rw-r--r--testsuite/systemtap.context/backtrace.tcl14
1 files changed, 10 insertions, 4 deletions
diff --git a/testsuite/systemtap.context/backtrace.tcl b/testsuite/systemtap.context/backtrace.tcl
index e35832ee..703f0ec2 100644
--- a/testsuite/systemtap.context/backtrace.tcl
+++ b/testsuite/systemtap.context/backtrace.tcl
@@ -5,7 +5,13 @@ set m4 0
set m5 0
set m6 0
-spawn stap backtrace.stp
+if {[istarget ia64-*-*]} {
+ set retexp {.*return\>--\r\n 0x[a-f0-9]+ : yyy_func3[^\[]+\[systemtap_test_module2\]\r\n}
+} else {
+ set retexp {.*return\>--\r\n 0x[a-f0-9]+ : kretprobe_trampoline_holder[^\r\n]+\r\n}
+}
+
+spawn stap $srcdir/$subdir/backtrace.stp
#exp_internal 1
expect {
-timeout 240
@@ -36,7 +42,7 @@ expect {
incr m2
expect {
-timeout 5
- -re {.*---\r\n 0x[a-f0-9]+ : yyy_func3[^\[]+\[systemtap_test_module2\]\r\n} {
+ -re {.*call\>--\r\n 0x[a-f0-9]+ : yyy_func3[^\[]+\[systemtap_test_module2\]\r\n} {
if {$m2 == 1} {incr m2}
exp_continue
}
@@ -76,7 +82,7 @@ expect {
incr m4
expect {
-timeout 5
- -re {.*0x[a-f0-9]+ : kretprobe_trampoline_holder[^\[]+\[\]\r\n} {
+ -re $retexp {
if {$m4 == 1} {incr m4}
exp_continue
}
@@ -104,7 +110,7 @@ expect {
incr m6
expect {
-timeout 5
- -re {.*---\r\n 0x[a-f0-9]+[^\r\n]+\r\n} {
+ -re {.*profile>--\r\n 0x[a-f0-9]+[^\r\n]+\r\n} {
if {$m6 == 1} {incr m6}
}
}