diff options
author | Frank Ch. Eigler <fche@elastic.org> | 2009-04-30 16:54:04 -0400 |
---|---|---|
committer | Frank Ch. Eigler <fche@elastic.org> | 2009-04-30 16:54:04 -0400 |
commit | c12f7fa15eec148307fa94f886b0673c1d0dd789 (patch) | |
tree | 2d2684bc83b26cb64b9e628f1f2cb2f019fc18df /testsuite/systemtap.syscall | |
parent | b7b8900677fad295a637912a3254e03c0758939e (diff) | |
download | systemtap-steved-c12f7fa15eec148307fa94f886b0673c1d0dd789.tar.gz systemtap-steved-c12f7fa15eec148307fa94f886b0673c1d0dd789.tar.xz systemtap-steved-c12f7fa15eec148307fa94f886b0673c1d0dd789.zip |
whitespace tweak in tcl code
Diffstat (limited to 'testsuite/systemtap.syscall')
-rw-r--r-- | testsuite/systemtap.syscall/syscall.exp | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/testsuite/systemtap.syscall/syscall.exp b/testsuite/systemtap.syscall/syscall.exp index 2313403f..22e9dc07 100644 --- a/testsuite/systemtap.syscall/syscall.exp +++ b/testsuite/systemtap.syscall/syscall.exp @@ -48,15 +48,9 @@ proc test_procedure {} { set do_32_bit_pass 1 switch -regexp $::tcl_platform(machine) { - ^(x86_64|ppc64)$ { - set flags "additional_flags=-m32" - } - ^s390x$ { - set flags "additional_flags=-m31" - } - ^ia64$ { - set do_32_bit_pass 0 - } + {^(x86_64|ppc64)$} { set flags "additional_flags=-m32" } + {^s390x$} { set flags "additional_flags=-m31" } + {^ia64$} { set do_32_bit_pass 0 } } if {$do_32_bit_pass} { |