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 | |
| parent | b7b8900677fad295a637912a3254e03c0758939e (diff) | |
| download | systemtap-steved-c12f7fa15eec148307fa94f886b0673c1d0dd789.tar.gz systemtap-steved-c12f7fa15eec148307fa94f886b0673c1d0dd789.tar.xz systemtap-steved-c12f7fa15eec148307fa94f886b0673c1d0dd789.zip | |
whitespace tweak in tcl code
| -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} { |