diff options
-rw-r--r-- | testsuite/systemtap.syscall/ChangeLog | 4 | ||||
-rw-r--r-- | testsuite/systemtap.syscall/test.exp | 5 |
2 files changed, 7 insertions, 2 deletions
diff --git a/testsuite/systemtap.syscall/ChangeLog b/testsuite/systemtap.syscall/ChangeLog index 8552351c..1fa61a87 100644 --- a/testsuite/systemtap.syscall/ChangeLog +++ b/testsuite/systemtap.syscall/ChangeLog @@ -1,3 +1,7 @@ +2007-01-15 Mike Mason <mmlnx@us.ibm.com> + + * test.exp: test 32-bit binaries on ppc64 + 2007-01-09 Martin Hunt <hunt@redhat.com> * test.exp, test.tcl, test-debug.tcl: PR 3524. diff --git a/testsuite/systemtap.syscall/test.exp b/testsuite/systemtap.syscall/test.exp index 2d441cb2..8068a6fc 100644 --- a/testsuite/systemtap.syscall/test.exp +++ b/testsuite/systemtap.syscall/test.exp @@ -22,8 +22,9 @@ proc test_procedure {} { } } - if {$::tcl_platform(machine) == "x86_64"} { - # on x86_64, test 32-bit and 64-bit binaries + if {$::tcl_platform(machine) == "x86_64" || + $::tcl_platform(machine) == "ppc64"} { + # on x86_64 and pcp64, test 32-bit and 64-bit binaries set flags "additional_flags=-m32" foreach filename [lsort [glob $pattern]] { set file [file tail [string range $filename 0 end-2]] |